A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
こんにちは
こなのでも可能かと。
Sub Sample()
With Range("I1").Resize(Cells(Rows.Count, 8).End(xlUp).Row)
.Formula = "=IF(H1="""","""",""・"")"
.Value = .Value
End With
End Sub
早速のご記入ありがとうございます。
Forなどを使い色々やってみましたが全然動かず
こんなに短い構文で動くんですね。
いつも助けて頂きありがとうございます。m(__)m
No.1
- 回答日時:
以下のマクロを標準モジュールに登録してください。
Public Sub sample()
Dim i As Long
For i = 1 To Cells(Rows.Count, "H").End(xlUp).Row
If Cells(i, "H").Value = "" Then
Cells(i, "I").Value = ""
Else
Cells(i, "I").Value = "-"
End If
Next
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルVBAについて 2 2023/01/31 16:21
- Excel(エクセル) Excel 値を返す数式についてです 3 2022/11/21 20:08
- Excel(エクセル) capeofdragonと申します Excel2016を使っておりまして 半角又は全角の任意文字列が 2 2022/10/31 13:51
- Visual Basic(VBA) VBA 「,」・空白・カタカナ等の複数条件のマクロ 2 2023/08/23 11:57
- Excel(エクセル) Excelについて質問です(ver2019) 1 2023/06/30 21:20
- Visual Basic(VBA) VBA とびとびの列を結合させる 1 2023/10/18 11:12
- その他(Microsoft Office) Excel VLOOKUP関数複数条件の求め方について 4 2021/10/25 10:28
- その他(データベース) Accessのクエリで1フィールドの抽出条件設定をNullでなく全角半角含む空白のみの文字列でない文 1 2023/04/24 15:20
- Visual Basic(VBA) Excel VBA 書式変更で困ってます。 オートフィルターの日付フィルターを用いて データの絞り込 2 2022/07/26 22:16
- Excel(エクセル) IF文の管理を簡単にしたい 4 2021/11/07 11:23
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教える店舗&オフィスのセキュリティ対策術
中・小規模の店舗やオフィスのセキュリティセキュリティ対策について、プロにどう対策すべきか 何を注意すべきかを教えていただきました!
-
VBAで「セルに何か入っている場合」
Windows Me・NT・2000
-
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
【VBA】特定列に文字が入っていたらそのセル行をコピーしてマスターブックの同じ行に貼り付けたい
その他(Microsoft Office)
-
-
4
VBA Cのセルが空白でなかったら、Aのセルに順番に数値を入力
Visual Basic(VBA)
-
5
【vba】指定範囲の中に任意の文字があるときの条件分岐
Excel(エクセル)
-
6
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
7
環境依存文字?をEnumで定義したい
Visual Basic(VBA)
-
8
一つのフォルダーに50個のエクセルファイルがあります。 各ファイルにはAとBのシートがあります。 5
Visual Basic(VBA)
-
9
VBA とびとびの列を結合させる
Visual Basic(VBA)
-
10
VBA 同じ名前のオブジェクトを選択したいのですが
Visual Basic(VBA)
-
11
csvファイルを列数ごとに分割するExcelマクロが書けずに困っています
Visual Basic(VBA)
-
12
Range.RemoveDuplicates メソッド
Visual Basic(VBA)
-
13
ExcelのVBAのことで質問です。 以下のコードを入れ、ボタンを押せば作動させると写真のように画面
Visual Basic(VBA)
-
14
VBAの質問です、複数のテキストボックスに同じコメントを
Visual Basic(VBA)
-
15
引数に数値、文字列の混在
Visual Basic(VBA)
-
16
マクロ 実行ボタンを押さずに常に実行
Excel(エクセル)
-
17
i=cells(Rows.Count, 1)とi=cells(Rows.Count, 2)の違い
Visual Basic(VBA)
-
18
エクセルで添付画像のように値を入力する方法はありますか?
Excel(エクセル)
-
19
Excel VBAにて、2GB超の点群データ(CSVファイル,改行コードLF)を高速で解析したい。
Visual Basic(VBA)
-
20
エクセル CSVファイルについて
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA指定行削除
-
Excelで、あるセルの値に応じて...
-
Worksheets メソッドは失敗しま...
-
B列の最終行までA列をオート...
-
二つのリストを比べて部分一致...
-
エクセルで結合セルがあるため...
-
文字列の結合を空白行まで実行
-
VBマクロ 色の付いたセルを...
-
vba 2つの条件が一致したら...
-
マクロ 最終列をコピーして最終...
-
Cellsのかっこの中はどっちが行...
-
VBAを用いて条件付きの平均値、...
-
rowsとcolsの意味
-
☆エクセル マクロ 範囲の値を上...
-
VBAを使って検索したセルをコピ...
-
DataGridの列の数、行の数
-
別シートのデータを参照して値...
-
空白セルをとばして転記
-
targetをA列のセルに限定するに...
-
エクセルについて
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Worksheets メソッドは失敗しま...
-
B列の最終行までA列をオート...
-
Excelで、あるセルの値に応じて...
-
vba 2つの条件が一致したら...
-
Cellsのかっこの中はどっちが行...
-
VBAを使って検索したセルをコピ...
-
文字列の結合を空白行まで実行
-
VBA指定行削除
-
VBAのFind関数で結合セルを検索...
-
IIF関数の使い方
-
VBA 何かしら文字が入っていたら
-
マクロ 最終列をコピーして最終...
-
エクセルについて
-
【VBA】2つのシートの値を比較...
-
URLのリンク切れをマクロを使っ...
-
データグリッドビューの一番最...
-
Changeイベントでの複数セルの...
-
空白セルをとばして転記
-
rowsとcolsの意味
-
エクセルVBAにて =A1=B1とすれ...
おすすめ情報