誕生日にもらった意外なもの

If…もしも

の検索結果 (10,000件 61〜 80 件を表示)

SQL文 Where句の複数検索

…先日教えて頂いたところから自分なりに複数検索をする方法を考えて書いてみたのですが、これだとテキストボックスに複数検索条件を入力するとSQLの構文エラーになってしまいうまくいき...…

解決

なぜShowAllDataだとうまく行かないのでし

…なぜShowAllDataだとうまく行かないのでしょう? 「オートフィルタがかかってるなら解除する」 と言うコードを勉強しているのですが Sub a() If ActiveSheet.AutoFilterMode = True Then ActiveSheet.ShowAllData E...…

解決

GetKeyStateについて

…こんにちは。GetKeyStateについて質問させていただきます。 VB6にて、APIの「GetKeyState」を使用し、Tabキーのキー入力判断を行っているのですが、その他の操作(GetKeyStateを判断しているフ...…

解決

Had I done... の説明

…Had I done... で「もしも~していたら」という 意味になると思うのですが、 この文法について詳しく説明している ホームページがありましたら、URLお願いします。 また、この場で、詳...…

解決

FileSearchがExcel2010でできない

…下記のVBAでExcel2003では出来たのですが、Excel2010ではエラーになります。 Excel2003と同じような動作をExcel2010で行いたいのですが、どこをどのように変えたら使用できるようになるでしょうか?...…

解決

VBA Call BeforeDoubleClick(ByVal Target As Range)

…Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range)で、 セルA1をダブルクリックすると、プロシージャMacro1へとび、Macro1で所定の処理を行ったあと、もとのPrivate Sub Worksh eet_BeforeDoubleClick(ByVal Targ...…

締切

指定範囲内のオートシェイプを数えるには?

…I5:I24の範囲内のオートシェイプの数を数え、I25に合計数を表示させるマクロを作っているのですが、どうしても範囲指定の仕方が分かりません。教えてください。 'オートシェイプの合計...…

解決

エクセルで縦方向のオートフィルタはできないので、

…E4~Z4セルに、その列を表示させる場合は1を、させない場合は0が立つようにして If Range("E4").Value = 0 Then Columns("E:E").Select Selection.EntireColumn.Hidden = True End If If Range("F4").Value = 0 Then Colu...…

解決

起動しているIEをVBSで閉じるときの問題・・・

…VBスクリプトで起動しているIEを探し特定のサイトであればウィンドウを閉じたいのですがどのようにすればよいのでしょうか? Dim ObjIE Dim ObjShell Dim ObjWindow Dim WinExist WinExist = False Set O...…

解決

下記マクロでMsgBox "空白です。"の部分の メッセージボックスは現れるものの 空白です。の文字

…下記マクロでMsgBox "空白です。"の部分の メッセージボックスは現れるものの 空白です。の文字が出ません。 原因が分かりません。 全シートの左から3枚目以降のシートを対象に A3:CEの中に...…

解決

If I had + 過去分詞

…ときたら、必ず仮定法だと言い切れますか? 言い切れないような例があればどういう場合か、例文も教えて下さい。…

解決

16進数

…(.net) テキストボックスに16進数のみ入力が出来るようにするにはどうすればいいのdしょうか? VB6では下記ので出来たと思うのですが netではできないのです。 教えて下さい。 ...…

解決

エクセルでセルをクリックして“○”や✔マークを入力

…『エクセルでセルをクリックすると“○”と入力』という質問があり、皆さんの回答がわかりやすかったので、自分も一つ質問させて下さい。 同じシート内であるセルをクリックすると〇...…

締切

VBA:結合されたセルに対する「Target」について

…Private Sub Worksheet_Change(ByVal Target As Range)   If Target = "" Then     MsgBox "空欄です"   End If End Sub 上記コードで、セルにカーソルを合わせてDeleteキーを押すと正常にメッセージが表示...…

解決

Accessログイン権限

…Access2003を使用しています。 ログイン画面を作成しておりログイン自体はできたのですが、 管理者とそうでないユーザーに分けて、ログイン時に管理者であればfrm_mainを、 そうでなけれ...…

解決

[VBA]型が一致しません

…EXCELWORKSHEET上で下記の処理をすると「型が一致しません」との エラーがでます。どうにも原因と対応策がわからず悩んでいます。 デバッグの良い方法ありませんでしょうか? <現象> ...…

解決

エクセルのマクロについて教えてください。

…下記のマクロを実行すると 不要シートを削除し ダイナログが開き、保存先フォルダを指定して 指定セル値名でブックが保存されます。 マクロの機能を残しつつ 保存先だけを下記の内容...…

解決

EXCEL VBA 選択範囲をTargetに

…WorkSeet Chengeで If Target.Range("E20:E100") Then If Target.Offset(0,1)"" Then Target=Target.Offset(-1,0) End If End If E20からE100の間でもし右隣のセルに何か入力されたら上のセルと同じ値を表示する、とい...…

解決

エクセルのマクロについて教えてください。

…下記のマクロは先ほど教えて頂いたマクロで コピー元の指定シートとセル値をコピー先にコピペできます。 Sub Macro1() Call 採光シートコピー範囲 Call 貼り付け Call 採光データ削除 End Sub ...…

解決

マクロで複数シートから検索

…シート(1)の指定セルに名前を入力すると、シート(2)とシート(3)の中から入力されている名前を探してくるマクロを教えて頂きたいのですが、今のところシート(2)のみ検索されるマ...…

締切

検索で見つからないときは質問してみよう!

Q質問する(無料)