私はExcelVBAの完全な初心者です。
以下は、シートの列を反復処理し、左側の列の値を参照して値を入力し、同じブック内の別のシートを参照して、対応する正しい値を見つける必要があるコードです。
ループを使用したWhile
ので、このマクロを列の各セルに適用できますVLOOKUP
(ルックアップ値のみが変更され、左側の列を示す変数である必要があります):
Dim result As String
Dim sheet As Worksheet
Dim rownum As Integer
Dim iterator As Integer
Dim lookup_value As String
Dim vlookupString1 As String
Set sheet = ActiveWorkbook.Sheets("datasheet")
rownum = sheet.Range("A1").End(xlDown).Row
Set iterator = 3
While iterator < rownum
lookup = "M" & iterator
vlookup1String = "=VLOOKUP(" & lookup & ",'GICS Sub-industry codes'!$A$2:$B$155,2,FALSE)"
With ActiveSheet.Cells
Range("N" & iterator).Select
Selection.Value = vlookup1String
End With
iterator = iterator + 1
End While
「期待されるか、選択するか、サブ...」と言っているときに、エラー@endが発生します。
1)構文エラーが発生しましたか?
2)私のアプローチは正しいですか。VLOOKUPS
私は、vbaで設計するこの文字列アプローチを他の1つの場所でのみ観察しました。それが最も適しているようでした。