Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
284to288
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
284to288
284to288
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

letzte Zeile suchen

letzte Zeile suchen
23.07.2003 08:48:04
Graml Alois
Hallo!
Ich habe ein kleines Problem
Ich möchte die letzte Zeile von Tabelle2 suchen und in einem Textfeld die Anzahl der Zeilen ausgeben.
Was mache ich da nur falsch?
Ich bekomme aber immer nur die Anzahl der Tabelle1
Ich bitte um Hilfe
Vielen Dank im Voraus
Alois
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Private Sub CommandButton1_Click()
Dim tb1 As Worksheet
Dim tb2 As Worksheet
Dim inttmp%
Set tb2 = ThisWorkbook.Worksheets("Tabelle2")
tb2.Activate
tb2.Range("A1").Select
inttmp = Cells(Rows.Count, 1).End(xlUp).Row
Txt1 = inttmp
Set tb1 = ThisWorkbook.Worksheets("Tabelle1")
tb1.Activate
tb1.Range("a1").Select
End Sub

                    

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: letzte Zeile suchen
23.07.2003 09:26:15
Yvonne
Hallo Alois,
ändere einfach die Zeile
inttmp = Cells(Rows.Count, 1).End(xlUp).Row
in
inttmp = tb2.Cells(Rows.Count, 1).End(xlUp).Row
Dann sollte es funktionieren.
Gruß, Yvonne

AW: letzte Zeile suchen
23.07.2003 09:44:59
Alois
Hallo Yvonne!
Viele Grüße und besten Dank!
Alois

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige