ご存知の方いらっしゃいましたらお願いします。
Excelは2003を使用しています。
Excelで「とある条件にあった場合、この情報を貼り付ける」というマクロは可能でしょうか。
当方マクロ知識は「マクロの記録」程度です。
A列に文字が入っていた場合、D列に別シートにある関数のセル(★)を貼り付ける
(この場合は、「商品い」のD列に★がコピーされる)
A列 B列 C列 D列
商品あ 50円
倉庫 商品い 10円 ★
商品う 20円
この逆(A列に情報がない場合)や、条件を複数にしたり等も出来ればうれしいです。
No.3ベストアンサー
- 回答日時:
>「YシートのA1に文字がない場合、WシートのA2セルをYシートのD1に貼り付ける」
>「YシートのA1に文字がなく、C列にも文字がある場合、WシートのA2セルをYシートのD1に貼り付ける」
この二つの違いが不明ですが。
取り敢えずYシートのA列に
・入力があればWシートのA1の数式を同じ行のD列に入れる。
・値がクリアされたらWシートのA2の数式を同じ行のD列に入れる。
と言う条件としました。
(値の入力・クリアは複数セルには未対応。1つずつ行なうとしてます)
Yシートのシートタブを右クリック>コードの表示で表示された
シートモジュールにコピペ。
Private Sub Worksheet_Change(ByVal Target As Range)
Dim ws As Worksheet
Set ws = Worksheets("Wシート") 'シート名変更?
With Target
If .Column <> 1 Then Exit Sub
If .Cells.Count > 1 Then Exit Sub
If LenB(.Value) <> 0 Then
.Offset(, 3).Formula = ws.Range("A1").Formula
Else
.Offset(, 3).Formula = ws.Range("A2").Formula
End If
End With
End Sub
シート名”Wシート”は変更願います。
No.2
- 回答日時:
ANo.1です。
WシートのA1やA2は固定ですか?
数式を代入するのか、値を代入するのか、どちらでしょう。
No.1
- 回答日時:
>A列に文字が入っていた場合、D列に別シートにある関数のセル(★)を貼り付ける
A列に文字が入った場合、別シートのどこのセルから貼り付けるのかが
不明です。
>この逆(A列に情報がない場合)や、条件を複数にしたり等も出来ればうれしいです。
詳細が不明です。
A列に文字がない時はどうしたいのか。
複数条件とは何を差すのか、そして何をしたいのか。
この回答への補足
わかりにくい説明ですみません。
例えば・・・
作業ワークシート:Yシート
関数セルがあるワークシート:Wシート
「YシートのA1に文字があった場合は、WシートのA1セル(関数が入力されている)を、YシートのD1に貼り付け、
YシートのA1に文字がない(空白)の場合は、貼り付けない」
というのをやりたいです。
可能であれば、
「YシートのA1に文字がない場合、WシートのA2セルをYシートのD1に貼り付ける」
「YシートのA1に文字がなく、C列にも文字がある場合、WシートのA2セルをYシートのD1に貼り付ける」
というちょっと違うパターンなども出来れば嬉しいです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(Microsoft Office) Excelで該当しない項目(#N/Aの商品名)を簡単に表示・抽出させる方法についてです 1 2022/08/25 22:12
- Excel(エクセル) 重複データの抽出について 2 2023/07/21 14:52
- Excel(エクセル) Excel関数 情報引用する方法 4 2022/07/31 20:59
- Excel(エクセル) 【条件付き書式】countifsで複数条件を満たしたセルを赤くする方法 2 2023/02/09 23:53
- Visual Basic(VBA) 【VBA】指定した検索条件に一致したら別シートに転記したい 2 2022/03/23 16:14
- Excel(エクセル) エクセルの条件付き書式 個人シートを参照して集計シートに色付けしたい 1 2023/06/22 00:39
- Excel(エクセル) 【困っています】VBA 追加処理の記述を教えてください。 1 2022/08/25 22:54
- Visual Basic(VBA) Excel vbaについて知恵もしくは、コード教えて下さいm(__)m ① 表にあるデータをコピー、 2 2022/09/01 23:57
- Excel(エクセル) エクセルのマクロ作成について教えてください 5 2023/02/20 00:39
- Excel(エクセル) Excel 知恵を下さい。 下記表は、例です。本来の表のデータ量は、1000件以上あります… A列: 9 2023/01/13 12:08
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
別のシートから値を取得するとき
-
【ExcelVBA】全シートのセルの...
-
ExcelVBA シート名を複数セルか...
-
【VBA】特定の文字で改行(次の...
-
Excel チェックボックスにチェ...
-
VBAで指定シート以外の選択
-
【Excel VBA】Worksheets().Act...
-
VBA 存在しないシートを選...
-
VB6.0でEXCELにシートを追加したい
-
ListViewの画面の更新
-
特定の文字を含むシートだけマ...
-
エクセルのシート名変更で重複...
-
vba 環境依存文字がListViewボ...
-
リストボックスの複数データを...
-
XL:BeforeDoubleClickが動かない
-
同じ作業を複数のシートに実行...
-
ブック名、シート名を他のモジ...
-
Excel マクロについての相談
-
【VBA】色のついたシート名を取得
-
ユーザーフォームに入力したデ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
別のシートから値を取得するとき
-
ユーザーフォームに入力したデ...
-
Excelマクロのエラーを解決した...
-
excelのマクロで該当処理できな...
-
同じ作業を複数のシートに実行...
-
ExcelVBA シート名を複数セルか...
-
【ExcelVBA】全シートのセルの...
-
Excel マクロについての相談
-
VBA 存在しないシートを選...
-
実行時エラー'1004': WorkSheet...
-
特定の文字を含むシートだけマ...
-
ExcelのVBAのマクロで他のシー...
-
ブック名、シート名を他のモジ...
-
XL:BeforeDoubleClickが動かない
-
VBA 複数の各シートに行を追加...
-
エクセルのシート名変更で重複...
-
【Excel VBA】Worksheets().Act...
-
シートが保護されている状態で...
-
Excel VBA 複数行を数の分だけ...
-
for 文の 繰り返し処理に使える...
おすすめ情報