前提・実現したいこと
フィルターをかけた後に何行が抽出されますが
「抽出してでてきたデータのC3のデータを「別ブック」のG3セルに入れる、
2つめの抽出されたC11のデータを「別ブック」のG3セルにいれる
例えば5列抽出されたら5ブックが出現し、例えば3行目・4行目・8行目・11行目・12行目
が抽出されたとします。
コピー元ブック C3 → コピー先ブックG3
コピー元ブック C4 → コピー先ブックG3
コピー元ブック C8 → コピー先ブックG3
コピー元ブック C11 → コピー先ブックG3
コピー元ブック C12 → コピー先ブックG3
毎回転記したい列は同じで行番号だけは抽出によって違うのですが
その違いを表現できず、調べてでてきたものを加工してもうまくいきません。
(固定でセルを指定してしまっているのは、っているのですが)
新しく転記したデータのB2セルに入っている文字をタイトルにして
xlsxで保存したいのですが、保存ウィンドウまではいくのですが
ファイル名は空っぽのままです。
発生している問題・エラーメッセージ
エラーは出ず、できてない状態(元のC3データが転記先エクセルのG3に転記しただけのまま)で終わる。
該当のソースコード
1つめの疑問
Sub 貼り付け()
ThisWorkbook.Worksheets("Sheet1").Range("C3").Copy Workbooks("転記先.slsx").Worksheets("Sheet1").Range("G3”)
End Sub
2つ目の疑問(別ブックのB2セルをxlsxで保存)
Sub 保存()
Application.Dialogs(xlDialogSaveAs).Show Arg1:=Range("B2").Value
試したこと
マクロの記録を使ってやってみましたが、うまく応用できませんでした。
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。