22.09.2022, 14:40
Moin zusammen,
ich komme gerade nicht weiter. Ich habe eine Excel Datei, in der in Zelle G5 ein Wert steht. Dieser soll per Button geändert werden. Wenn man auf den Button klickt dann soll in einer anderen Datei in Spalte B der Wert gefunden werden und in der nächsten Zeile der Wert soll in "ThisWorkbook" in Zelle G5 eingefügt werden.
Allerdings... Bekomme ich immer nur den letzten wert der Spalte zurück und nicht den nächsten.
Und ohne dem GoTo weiter, ist Excel scheinbar in einer Dauerschleife.
Ich hoffe, das mir einer helfen kann, Programmieren in PHP und C# bekomme ich hin. aber. VBA ist irgend wie.... Keine Ahnung. XD
ich komme gerade nicht weiter. Ich habe eine Excel Datei, in der in Zelle G5 ein Wert steht. Dieser soll per Button geändert werden. Wenn man auf den Button klickt dann soll in einer anderen Datei in Spalte B der Wert gefunden werden und in der nächsten Zeile der Wert soll in "ThisWorkbook" in Zelle G5 eingefügt werden.
Allerdings... Bekomme ich immer nur den letzten wert der Spalte zurück und nicht den nächsten.
Und ohne dem GoTo weiter, ist Excel scheinbar in einer Dauerschleife.
Ich hoffe, das mir einer helfen kann, Programmieren in PHP und C# bekomme ich hin. aber. VBA ist irgend wie.... Keine Ahnung. XD
Code:
Sub btnPlus()
Dim varOpenFile As Workbook
Dim strDatei As String
Dim strOldValue As String
strOldValue = Range("G5").Value
strDatei = "Liste Wiegeschein EDV.xlsx"
Set varOpenFile = Workbooks.Open(strDatei)
For i = 1 To Rows.Count
If Cells(i + 1, 2) = strOldValue Then
Cells(i, 2).Copy
GoTo weiter
End If
Next
weiter:
ThisWorkbook.Activate
Range("H5").Select
ActiveSheet.Paste
varOpenFile.Close
End Sub