エクセルで単純な入力を簡単にしたい

質問

会社で、マクロがくまれたエクセルの様式に入力していく仕事があります。
コンスタントに毎日２時間、２０件ほど入れるのですが、入力する箇所が多く、しかもあちこちに散らばっています。

そこで、別のエクセルに入力する箇所を(1)～(10)まで降った簡単な表をつくり、そこに入力すれば、ボタン一つでそちらに転記してくれる・・・ようなものがあればいいのですが、なにか使えるものはあるでしょうか。

おもいつくままに、
１　エクセルのマクロ、というのが使えるみたいですが、当方はそのスキルがありません。勉強するとしたら、どうしたらいいでしょうか。

２　入力を外注したいが、金がない

３　その他

何かいい方法をご存じでしたら、アドバイスをお願いします。

回答No.4

watabe007

>マクロがくまれたエクセルの様式
マクロによる入力箇所を
Workbooks("マクロがくまれたエクセル.xlsm").Sheets("Sheet1")の
A2・C2・B3・D4・・セルとしました。(10か所)
Sub Test()
　　Dim ws As Worksheet
　　Dim strAdd As Variant, i As Long
　　Set ws = Workbooks("マクロがくまれたエクセル.xlsm").Sheets("Sheet1")
　　'転記先のセルのアドレスを順にA2・C2・B3・D4・・・・としています。
　　strAdd = Array("A2", "C2", "B3", "D4", "A5", "C5", "B6", "A8", "C9", "A10")
　　With ThisWorkbook.Sheets("Sheet1")
　　　　For i = 1 To 10
　　　　　　ws.Range(strAdd(i - 1)).Value = .Cells(i, "A").Value
　　　　Next
　　End With
End Sub