Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 18:57:33
17.04.2024 16:56:58
Anzeige
Archiv - Navigation
300to304
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
300to304
300to304
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

daten in tabelle schreiben

daten in tabelle schreiben
26.08.2003 14:27:57
Thorsten
Hallo,
ich schreibe daten aus dialog in eine tabelle:

lngLRow = .Cells(.Rows.Count, 1).End(xlUp).Row + 1
.Cells(lngLRow, 1) = Me.comp_part

nun will ich aber vorher checken ob es den artikel in der tabelle schon gibt.
finde den entsprechenden befehl nicht
gruss
ThF

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: daten in tabelle schreiben
26.08.2003 14:46:13
Beni
Hallo Thorsten,
das sollte funtionier.
Gruss Beni

Wert = Me.comp_part
With Worksheets("Tabelle").Columns("A") ' anpassen
Set C = .Find(Wert, LookIn:=xlValues, LookAt:=xlWhole)
If Not C Is Nothing Then
MsgBox "Artikel schon vorhanden"
Else
lngLRow = .Cells(.Rows.Count, 1).End(xlUp).Row + 1
.Cells(lngLRow, 1) = Me.comp_part
End If
End With
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige