Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
25.09.2025 16:01:26
VBA - Laufzeitfehler 9105 zu viele Zeichen 255
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
508to512
508to512
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabelle in bestimmter Zeile öffnen

Forumthread: Tabelle in bestimmter Zeile öffnen

Tabelle in bestimmter Zeile öffnen
02.11.2004 19:44:01
Tabelle
Hallo Leute,
ich habe eine Urlaubstabelle erstellt mit verschiedenen Sortierfunktionen. In Spalte A stehen Datums (ich weiß, Mehrzahl = Daten, aber Verwirrungsgefahr). Die Tabelle beginnt am 1.1.2004.
Beim Öffnen der Tabelle wird also der 1.1.2004 angezeigt. Leider sind wir alle seit dem um 11 Monate gealtert und viele denken mit Wehmut an die verlorenen Monate. Um das zu vermeiden, möchte ich, dass die Tabelle immer soweit "runterscrollt", bis in Spalte A das aktuelle Datum angezeigt wird...was muss ich da VBA-mäßig mittels Workbbook_open machen?
Gruß, Claus
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabelle in bestimmter Zeile öffnen
geri
Hallo Claus

Private Sub Worksheet_Activate()
Dim C As Range
On Error Resume Next
With Cells
Set C = .Find(Date, LookIn:=xlFormulas)
If Not C Is Nothing Then
C.Select
Else
MsgBox "Datum wurde nicht gefunden!" & Space(10), 64, "gebe bekannt..."
End If
End With
End Sub

siehe auch unter services/recherche da findest du X beispiele und varianten
gruss geri
Anzeige
AW: Tabelle in bestimmter Zeile öffnen
02.11.2004 20:03:50
Claus
Klappt leider nicht - d.h., das Fenster, das nicht gefunden wurde, funktioniert....
AW: Tabelle in bestimmter Zeile öffnen
Reinhard
Hi Claus,
"...Klappt leider nicht - d.h., das Fenster, das nicht gefunden wurde, funktioniert...."
verstehe ich leider nicht.
Der Code ist in Ordnung, nur wird beim Open, keine Activate ausgeführt.
Klicke mal in tabelle2 , dann wieder in die Tabelle1...
Schreib halt den Code in Workbooks_Open
Gruß
Reinhard
Anzeige
Leider klappt es noch nicht...
02.11.2004 21:35:25
Claus
....weil erst ab Zeile 20 die Einträge beginnen. Sorry, das habe ich dummerweise verschwiegen. Wie muss also der Code lauten, damit er erst ab Zeile 20 nach dem heutigen Datum sucht?
Gruß und vielen Dank bis hierher, Claus
AW: Leider klappt es noch nicht...
geri
vielleicht meinst du so

Private Sub Worksheet_Activate()
Dim a As String
a = Date
For i = 4 To 1000
If ThisWorkbook.Application.Cells(i, 1) = a Then
ThisWorkbook.Application.Cells(i, 1).Select
Else
End If
Next i
End Sub

gruss geri
Anzeige
Nachfrage
Reinhard
Hi Claus,
steht denn in den ersten 20 zeilen das heutige datum? wenn nicht müßte der Code auch so laufen.
Da hat doch noch jemand geantwortet, probier das mal.
Gruß
Reinhard
PERFEKT!!! Danke
02.11.2004 22:16:11
Claus
:-)
;

Forumthreads zu verwandten Themen

Daten ab bestimmter Anzahl Zeile abschneiden
Joachim

Hi,
ich kopiere auf mein Sheet Daten in eine Textbox und wenn die Informationen zu lange sind, schneide ich sie:
If Len(TextBox7.Value) GRÖSSER 300 Then TextBox7.Value = Left(TextBox7.Value, 300) & "... (mehr Informationen finden Sie online !)"
Nun meine Frage: geht so was auch...
02.09.2008 13:37:00
Thread-ID: 1006769
6 Beiträge
Filtern in Zeilen
Andreas

Guten Morgen,
ist es möglich im Excel waagerecht zu filtern? Zum Beispiel sollte in Zeile 2 nach allen Spalten gesucht werden die den Wert "x" enthalten. D.h alle anderen Spalten die nicht dem Suchktrerium entsprechen müssten ausgeblendet werden.
Ist soetwas (ggf ohne Makro) möglich?
07.11.2008 06:20:00
Thread-ID: 1022476
7 Beiträge
Code soll erst ab bestimmter Zeile funktionieren
Joachim

Hi,
wie kann ich denn erreichen, dass der nachfolgende Code erst ab der 10. Zeile überprüft.
Zeilen 1-9 sollen unbeachtet bleiben:
Sub Kopieren() Dim lngRow As Long lngRow = Cells(Rows.Count, "B").End(xlUp).Row MsgBox lngRow End Sub
Danke mal
Joachim
04.12.2008 11:54:00
Thread-ID: 1030126
3 Beiträge
SelectFilter erst ab Zeile4
Josef

Guten Morgen!
Wenn ich bei der nachstehenden Musterdatei zuerst das Makro "Filter_setzen" und danach das Makro "Select_Filter-Terst" starte, so erfolgt in der Tabelle1 die Markeirung erst ab der Zeile 4 und nicht wie gwünscht ab der Zeile 3. Wo und wie müßte ich bitte hier den Code veränder...
13.01.2009 07:52:48
Thread-ID: 1039077
6 Beiträge
Zeilennr. in gefilterten und markierten Bereich
Kasimir

Hallo Leute,
ich stehe auf dem Schlauch und weiß ehrlich auch nicht so ganz, ob das was ich realisieren möchte überhaupt geht?
Also, ich filtere über den Autofilter Daten. Bei diesen gefilterten Daten möchte ich danach einen Bereich, also mehrere zusammenhängende Zellen in einer Spalte...
04.04.2009 08:21:59
Thread-ID: 1066813
7 Beiträge
erste Zeile des Autofilters per VBA erkennen
Ptonka

Hallo zusammen,
ich stehe vor folgendem Problem:
Ich filtere per VBA per Autofilter eine umfangreiche Liste.
Je nach dem, welches Filterkriterium ich mitgebe, ist die erste angezeigte Zeile
eine andere Zeilennummer - logisch.
Nun möchte ich diese erste angezeigte Zeilennumme...
07.05.2009 13:31:01
Thread-ID: 1073590
5 Beiträge
VBA: Autofilter auf "0" setzen
David

Hallo zusammen.
Wenn in der Datei ein Autofilter gesetzt ist und auch in einem beliebigen Feld ein Kriterium gesetzt ist, wie bekomme ich per VBA die Anzeige ALLER Elemente hin.
Mein Versuch mit Range(XYZ).Autofilter
löscht diesen komplett, was aber nciht gewollt ist. Und .Autofi...
27.08.2009 09:53:08
Thread-ID: 1098941
3 Beiträge
Max.Wert mehrerer Werte in einer Zelle
Peter

Hallo Forum,
wer kann helfen?
In einer Zelle sind (5 numer. Werte) gespeichert und duch ein
Semikolon getrennt. Die Zelle kann auch Leerstrings enthalten.
z.B. 4;33;;52;12
Ich möchte den max. Wert an die Textbox 'TxtAltKWo1'
übergeben.
Danke Peter
'Zellinhalt (5...
07.11.2009 20:59:50
Thread-ID: 1115285
3 Beiträge
Autofilter beginnt eine Zeile zu spät
tco99


Hallo zusammen,
ich habe folgendes Problem:
ich habe eine Beispielmappe gemacht. In dieser Mappe gibt es das Blatt "Daten" und das Blatt "Ausgabe". Mit einer Userform und den ComboBoxen in dieser Userform filtere ich die Daten und übertrage sie auf das Blatt "Ausgabe". Das Übertrag...
05.03.2010 10:46:51
Thread-ID: 1143590
8 Beiträge
Anzeige
Zeilen einfügen bei Autofilter
Martin

Hallo liebe Herber-Gemeinde,
ich habe in einer Datei einen Autofilter gesetzt und möchte mehrere gefilterte Zeilen in eine andere Datei mit identischem Aufbau hineinkopieren. Die Spaltenanzahl und Benennung ist in der 2. Datei wie gesagt genau derselbe und dort verwende ich ebenfalls einen...
03.08.2010 11:07:34
Thread-ID: 1170150
2 Beiträge
Zeilen einfügen bei Autofilter
Martin

Hallo liebe Herber-Gemeinde,
ich habe in einer Datei einen Autofilter gesetzt und möchte mehrere gefilterte Zeilen in eine andere Datei mit identischem Aufbau hineinkopieren. Die Spaltenanzahl und Benennung ist in der 2. Datei wie gesagt genau derselbe und dort verwende ich ebenfalls einen...
03.08.2010 11:06:50
Thread-ID: 1170154
3 Beiträge
mehrere werte in einer Zelle
knab

Hallo,
ich würde gerne in einer Zelle Ergebnisse aus mehreren zellen zusammenfassen.
Beispiel:
a1 = 30
a2= 40
a3 = 50
Ziel ist jetzt a4. Hier soll stehen 30,40,50
geht das und kann mir jemand die Formel hierfür geben.
Vielen Dank
16.09.2010 10:44:09
Thread-ID: 1178021
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige