У меня проблема с созданием файлов загрузки .txt для SAP LSMW.Код берет данные из открытой рабочей книги, а затем заполняет различные файлы .txt в зависимости от условий - в основном, по заголовкам.Файл работал хорошо, но я хотел бы переместить данные в два отдельных файла загрузки, основываясь на данных, которые находятся в столбце под «BUKRS».Здесь возникает проблема с тем, что Hlookup не может искать различные значения.Кроме того, все данные сохраняются только в файл «05-Vend-Loadcache (No WHTAX) .xls». Мне бы хотелось разделить файлы по номерам МВЗ, которые находятся в столбце «BUKRS».Это 9000, 5500, 6200, 8400, 8600, 8500. Эти должны идти в "06-Vend-Loadcache (WHTAX) .xls".К сожалению, это не работает, и заполняется только «05-Vend-Loadcache (No WHTAX) .xls».Понятия не имею почему?Не могли бы вы мне помочь, пожалуйста?
Sub VENDOR()
'CC3200 (LSMW1) LNRZB (LSMW4) Line 60 for 5500 ....
CCD = Application.WorksheetFunction.HLookup("BUKRS", DTA.Range("A1:IV2"), 2, 0)
CCE = DTA.Cells(1, 60)
WFNA = "05-Vend-Loadcache(No WHTAX).xls"
Select Case CCD
Case 9000, 5500, 6200, 8400, 8600, 8500
WFNA = "06-Vend-Loadcache(WHTAX).xls"
End Select
SHT = "BISOVSH"
DATACHK = 1
If ((CCE = "" Or CCE = "CC3200" Or CCE = "VERKF" Or CCE = "TELF1" Or CCE = "KZRET") And WFNA = "05-Vend-Loadcache(No WHTAX).xls") Then
Call EXPORTDTA
Else
'do nothing as not to Export
End If
If CCE = "LNRZB" And WFNA = "06-Vend-Loadcache(WHTAX).xls" Then
Call EXPORTDTA
Else
'do nothing as not to Export
End If
End Sub