Я хотел бы найти имя таблицы Excel на основе ввода ("LanguageCode") значения ячейки. например, значение ячейки - «NL». Я хочу найти лист «NL», а затем скопировать информацию на отдельный лист («Шаблон»).
Это мой код:
Sub ImportCountryValues()
Dim fileName As String
Dim Country As Variant
Dim Language As Variant
Dim CountryCode As Variant
Dim LanguageCode As Variant
Country = Workbooks("Mappe1.xlsm").Worksheets("Land-Sprache").Range("A2:A6").Value **<- this line errors with indexerror 9**
Language = Workbooks("Mappe1.xlsm").Worksheets("Land-Sprache").Range("B2:B6").Value
CountryCode = Workbooks("Mappe1.xlsm").Worksheets("Land-Sprache").Range("C2:C6").Value
LanguageCode = Workbooks("Mappe1.xlsm").Worksheets("Land-Sprache").Range("D2:D6").Value
For i = 1 To Worksheets.Count
If Worksheets(i).Name = "LanguageCode" Then
Sheets("CountryCode").Select
Range("F2:J20").Select
Selection.Copy
Sheets("Template").Select
Range("G2:K20").Select
ActiveSheet.Paste
Application.Dialogs(xlDialogSaveAs).Show (fileName)
End If
Next i
If Not exists Then
End If
End Sub