может быть, это простой вопрос. но не для меня Что у меня есть? У меня есть рабочий лист (с именем ZTN) с 5 столбцами под A, есть 2 значения «Да или Нет» / CHNumber B столбца (например, CH4711) / столбец C Элементы для примера «Salt» Столбец D свободен (без значений) и E ZTN со значениями numeri c (ZTN Number)
У меня также есть пользовательская форма с 3 текстовыми полями Txtbx44 для текстового поля элементов 46 для номера ZTN и Txtbx с именем MatNr
I также есть команда Поиск кнопки
Что я сделал?
Когда я вручную заполняю текстовое поле «Ware» и нажимаю кнопку поиска, мой макрос находит значения в листе «ZTN» заполнить Txtbxes MatNr и ZTN Здесь мой код
Dim raFund As Range
Set raFund = Worksheets("ZTN").Columns("C").Find(what:=UserForm1.Ware, LookIn:=xlValues, LookAt:=xlWhole)
If Not raFund Is Nothing Then
TextBox46 = Worksheets("ZTN").Cells(raFund.Row, "E")
MatNr = Worksheets("ZTN").Cells(raFund.Row, "B")
If Worksheets("ZTN").Cells(raFund.Row, "E") = Worksheets("ZTN").Cells(raFund.Row, "A").Value = "JA" Then
MsgBox "T1 RELEVANT!"
End If
Else
If MsgBox("Ware ist nicht vorhanden, soll ein neuer Eintrag angelegt werden?", vbYesNo, "Neuer Eintrag") = vbYes Then
With Worksheets("ZTN")
loLetzte = .Columns(2).Find(what:="*", LookIn:=xlValues, LookAt:=xlWhole, searchdirection:=xlPrevious).Offset(1).Row
.Cells(loLetzte, "A") = Me.MatNr
.Cells(loLetzte, "B") = Me.Ware
' .Cells(loLetzte, "D") = Me.Zolltarifnummer
End With
End If
End If
Set raFund = Nothing
End Sub
Что я хочу сделать? Я пытаюсь определить, является ли найденный ZTN NUmber случаем T1 или нет, для другого рабочего процесса. (вот почему у меня есть столбец A на листе «ZTN» со значением «Да» или «Нет», касающимся номера ZTN.
К настоящему времени я застрял, потому что тот элемент, который я набираю ... Msgbox говорит: «T1 Relevant!»
Я тоже застрял с Items. К настоящему времени, когда я попытаюсь найти Salt, он найдет Salt. Но в моем списке есть разные виды Salt (другой пример UCC0.1 / UTN0 .2 / BTS0: 0; Reinigungs-und Ätzmischungen für Mikroelektronikanwendungen
Это означает, что элемент U CC .1 означает UTN0.2 означает ... Reinigungs -...)
Это было бы неплохо найти элемент, похожий на функцию поиска в самом Excel. Не касаясь верхнего и нижнего регистра
Надеюсь, у кого-то будет хорошая идея
заранее спасибо Пит