［If…もしも］についての検索結果(約10000件中 161〜180件を表示)

エクセルのシート別印刷枚数指定（マクロ）

…よろしくお願い致します。先ほど下記に関してのマクロを質問し回答を得られたのですが、 >>１）シート１のA1セルを右クリックするとシート２を印刷。 >>２）シート１のB1セルを右クリッ...…

エクセル日報売上を月報に展開するマクロで困っております。準備するシート(1)日報入力シー...

…エクセル日報売上を月報に展開するマクロで困っております。準備するシート (1)日報入力シート (2)月報売上シート日報入力シートに作ったボタンを押すとB3の日付（今日）と月報売...…

エクセルマクロで結合されたセルをダブルクリックで指定文字を入力

…単独セルをダブルクリックして「レ」を入力する、マクロは組めたのですが、結合されたセルに適用しようとして、エラーではじかれています。下記のマクロ構文のどこを変えれば、対...…

【VBA】クリックする毎にセル色が変わる

…Excelのセルをクリックするたびに、「色なし→赤→青→黄→黒→色なし」などのように色を順番に変更する方法があれば教えてください。下記のSelectionChangeコードで、「色なし→黄→色なし...…

並べ替えお願いします。不要な語句1つあり

…彼女はまるで幽霊でも見たかのような顔つきをしている She[a ghost/as if/looks/she/had seen/saw]. 委員長は次の金曜日に委員会を開くことを提案した Tje chairperson[the committee/proposed/meet/will meet/that/next Fri...…

VBA エラー回避を教えてください。ループ内のMatchで値がないと止まってしまいます。

…ループ内のMatchで値がないと止まってしまいます。 On Error Resume Nextで回避すると次のデータに前のデータが入力されてしまいます。 Dim TATE2 '「データ」シートの縦 Dim MaxRow Dim 氏名 ...…

セルの値が0はクリアするマクロ

…エクセル2003です。ある集計表において 4行目のH列からAM列まで数値データがあります。最終行は常に変化しますこの表内にてセルの値が0のセルはセル内を空白にしたいです。以下のマ...…

インプットボックスでの日付入力

…いつもお世話になります Dim saa As String saa = InputBox("実行する日付を入力して下さい" & vbCrLf & "入力例）2016/03/17（半角入力）", "日付入力") If saa = "" Then Exit Sub If Not IsDate　saa Then MsgBox "...…

「実行時エラー3001」のポップが出てしまう

…下記のマクロでは、A列にあるURLのソースに、指定した語句が含まれているか調べるものです。このマクロを動かしていると、頻繁に、実行時エラー3001「引数が間違った型、許容範囲外...…

…Dim ws As Worksheet Dim i As Long For i = 1 To ThisWorkbook.Sheets.Count For Each ws In ThisWorkbook.Sheets If ws.name Like "*T*" Then ws.name = Replace(ws.name, "T", "S") End If Next Next End Sub この処理をするとnameメソッド失敗worksheetオ...…

エクセル VBA CheckBox名に変数を使用

…エクセル VBA CheckBoxのオブジェクト名に変数を使用して値を取得したいのですが・・・ If ActiveSheet.OLEObjects(TempName).Object.Value = True Then 　　　　　　　　　（処理） Else 　　　　　　　　　（...…

数値かどうかを取得したい　IsNumberではダメ

…Sub Macro2() Dim mystr As String mystr = "1" If IsDate(mystr) = False Then MsgBox "NO" End If End Sub これなら日付型かどうかを取得できるのに、 Sub Macro1() Dim mystr As String mystr = "1" If IsNumber(mystr) = False Then M...…

targetをA列のセルに限定するには？

…『A列のセルに変更があったときのみ実行する』マクロを組みたいと思っています。『If Target.Column = 1 Then』で条件をつけたのですが、これではA列と同時に他の列を同時に変更した場合、A...…

VBA 複数の非連続セルのみ指定して、文字の変換をしたい。

…VBA超初心者です。ネットで検索しながら、達人のものをコピペしながら少しづつ理解して、なんとかexcelを作っています。しかし、今回、どうにもうまくできないので質問です。下の様...…

（ＶＢＡ）フィルタがかかっているかどうかの判断方法

…フィルタがかかっているかどうかを取得したいのですがフィルタがかかっているシートにて Sub test1() If ActiveSheet.FilterMode Then MsgBox "フィルタがかかってます" End If End Sub Sub tes...…

VBAで行削除のできない場合がある

…次のようなデータがExcel、A列の各行のセルに入っています。 Japan 2-Nov 6-Dec 19-Nov 　・　・　・これらのセルの中味が月日を表示し、且つ、目的の月（今回は9月）以外のセルに該当す...…

指定の動作中ユーザーフォーム終了方法

…お世話になっております。タイトルに書ききれなかったため、詳しく書かせていただきます。 UserForm UserFormA UserFormB UserFormC　があります。 UserFormには、UserFormA,UserFormB,UserFormCを起動するた...…

ＶＢＡでMP3を鳴らしたい

…ｖｂａについて質問です。 MP3ファイルを鳴らしたいのですがうまくいきません。 --------------------------------------------------------- Sub Macro1() Dim SoundFile As String SoundFile = "C:\終了音.mp3" If Dir...…

アクセス　InputBox　キャンセルした場合を取

…InputBoxでキャンセルしたら、キャンセルされましたと表示させたいのですがどうも私のやってるサンプルはエクセル専用のようです。 http://www.moug.net/tech/exvba/0100036.html 自分なりに書き換えて...…

エクセルで連勤チェックをしたいです。

…画像みたいな感じで、５連勤、６連勤、7連勤・・・と、それぞれ連勤があるかないかをチェックをしたいのですが、５連勤以上しか見ることができず、６連勤があっても５連勤もありになっ...…