Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 14:03:38
Http-Request (POST) für GraphQL API-Abfrage
20.04.2024 08:56:18
Textbox in Tabellenblatt ohne Bestätigung in Zelle eintragen
20.04.2024 07:57:54
Tablle fürs E-Auto - Preis wenn kürzer als 60 Min Ladezeit
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1176to1180
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1176to1180
1176to1180
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Heutige Datumszeile in der ersten Zeile

Heutige Datumszeile in der ersten Zeile
Manfred
Hallo Excelfreunde,
gleich noch ein zweiter Wunsch. Ich würde gerne das beim öffnen der Datei immer die Zeile ganz oben steht, wo das aktuelle Datum in der Spalte "A" steht.
Gruß Manfred

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Heutige Datumszeile in der ersten Zeile
22.09.2010 08:16:23
Sebastian
Hallo Manfred,
schreib einfach in die erste Zelle
=Heute()
Wegen deinem zweiten Problem kann ich dir leider nicht helfen.
Du kannst höchstens vor dem Speichern und Schliesen in die erste Zelle Klicken
Gruß Sebastian
AW: Heutige Datumszeile in der ersten Zeile
22.09.2010 08:23:26
Manfred
Hallo Sebastian,
deine Antwort bezog sich scheinbar auf meine andere Frage. In der Spalte "A" steht ein Datum und dann soll immer das Tabellenblatt so angezeigt werden, dass das aktuelle Datum in der ersten Zeile steht.
Wäre auch gut, denn vielleicht die Vorwoche auch noch zu sehen ist, also aktuelles Datum -7 in der ersten Zeile.
Gruß Manfred
Anzeige
AW: Heutige Datumszeile in der ersten Zeile
22.09.2010 08:52:20
hary
Hallo
so 

Sub Heute()
Dim A As Range
For Each A In Range("A1:A" & Cells(Rows.Count, 1).End(xlUp).Row)
If A = Date - 7 Then
Application.Goto Reference:=Range(A.Address), scroll:=True
Exit For
End If
Next
End Sub

gruss hary
AW: Heutige Datumszeile in der ersten Zeile
22.09.2010 09:16:06
Manfred
Hallo Hary,
das Makro funktioniert, jedoch muß ich es von Hand anstossen. Schreibe ich es in eine Private Sub Workbook_Open(), dann passiert jedoch nichts. Was mache ich falsch?
Gruß Manfred
AW: Heutige Datumszeile in der ersten Zeile
22.09.2010 09:22:44
hary
Hallo
Habs verpennt;-(( Tabellenname noch anpassen. 

Private Sub Workbook_Open()
Dim A As Range
With Worksheets("Tabelle1") 'Tabellenname anpassen
For Each A In .Range("A1:A" & .Cells(Rows.Count, 1).End(xlUp).Row)
If A = Date - 7 Then
Application.Goto Reference:=.Range(A.Address), scroll:=True
Exit For
End If
Next
End With
End Sub

gruss hary
Anzeige
Danke
22.09.2010 09:24:44
Manfred
So?
22.09.2010 08:57:06
CitizenX
Guten Morgen Manfred
Code kommt ins Modul von "DieseArbeitsmappe"
Option Explicit
Private Sub Workbook_Open()
Dim myDateWeek As Long, myDate As Long
myDateWeek = Date - 8
myDate = Date
With Sheets("Tabelle1") 'Tabellen Namen anpassen!
myDateWeek = WorksheetFunction.Match(myDateWeek, .Columns(1), 0)
myDate = WorksheetFunction.Match(myDate, .Columns(1), 0)
.Activate
.Cells(1, 1).Select
ActiveWindow.SmallScroll down:=myDateWeek
.Cells(myDate, 1).Activate
End With
End Sub
Grüße
Steffen
Danke
22.09.2010 09:25:07
Manfred

305 Forumthreads zu ähnlichen Themen

In nächste Zelle springen
Peter

Wie kann ich ein dem Marko sagen, dass es am Ende eine Zelle nach rechts springen soll? Ich kann nur feste Zellen (z.B. immer A2) anwählen (Select). In diesem Fall wird das Makro immer an verschiedenen Stellen gestartet und daher immer eine andere Ziel-Zelle benötigt! Was kann man da tun? VB ka...
24.08.2008 20:53:00
Thread-ID: 1004300
5 Beiträge
Anzeige
Formel immer nur in bestimmter Zelle
Katrin

Hallo Zusammen!
Folgendes Problem würde ich gerne lösen, weiß aber nicht wie :)
Ich habe in Spalte A in jeder Zeile Uhrzeiten stehen:
00:15:00
00:30:00
00:45:00
01:00:00
01:15:00
01:30:00
01:45:00
02:00:00
02:15:00
02:30:00
02:45:00
...
02.09.2008 10:30:00
Thread-ID: 1006672
3 Beiträge
In Textfile bestimmte Zeile suchen
Pascal

In einem Textfile soll nach einer bestimmten Zeile (immer der gleiche Text) gesucht werden.
Wird dieser Text gefunden, so soll alles vom Beginn weg des Textfiles bis und mit dieser Zeile (plus zusätzlich noch die nächste Zeile) gelöscht werden.
Geht das irgendwie ?
Wenn ja, wie ?
24.09.2008 16:14:00
Thread-ID: 1012111
8 Beiträge
Anzeige
Makro nur in bestimmten Zellen
TomTom

Hi,
der folgende Code soll in der Spalte Q das Datum umformatieren. Nun habe ich aber auch in der Spalte Q auch leere Zellen drin und der Code schreibt dann in die leeren Zellen immer 01.01.1900 rein, obwohl sie eigentlich leer bleiben sollen.
Wie kann man den Code ändern, dass leere Ze...
13.11.2008 08:56:51
Thread-ID: 1024041
5 Beiträge
in farblich markierte Zelle springen
Maja

Hallo,
ich möchte in einem Excelblatt innerhalb eines bestimmten Zellbereichs diejenigen Zellen farblich anders markieren, die den Wert 0 aufweisen, die Namen dieser Zellen in einer MsgBox ausweisen und bei Klicken auf "OK" der MsgBox zur ersten der ausgegebenen markierten Zeile springen.
13.11.2008 15:11:05
Thread-ID: 1024246
6 Beiträge
Formelwerte in bestimmte Zellen
Sebastian

Hallo zusammen,
ich möchte gerne mit Hilfe eines Makros oder ähnlichem die Formelwerte eines bestimmten Arrays in ein bestimmtes Array eintragen lassen, wenn man darauf klickt.
Ist dies möglich? Wenn ja, wie? ;)
Vielen Dank für eure Hilfe und falls Ihr noch etwas mehr Info braucht,...
17.11.2008 21:32:00
Thread-ID: 1025413
7 Beiträge
Per Makro zu einer bestimmten Zelle springen
Joachim

HI,
dank Eurer Hilfe weiss ich nun, wie ich meine Spalte prüfen kann:
For Each c In .Range("BD10:BD100")
If Not IsDate(c) And Not IsEmpty(c) Then
UserForm1.TextBox1 = "Cell " & c.Address & " is not a date !"
Exit Sub
End If
Next
Wenn es die Möglichkeit gi...
25.11.2008 08:16:21
Thread-ID: 1027553
5 Beiträge
Letzte Zeile mit bestimmten Wert finden
Harald

Hallo und schönen Abend
Ich suche in einer Spalte die Zeile mit dem letzten Vorkommen eines bestimmten Wertes. Im Netz habe ich folgenden Code gefunden.
Sub suchen() Set Ws1 = Sheets("Dummy") Call Find_Last("9999999999.999") End Sub
Sub Find_Last(FindString As String) Dim Rng A...
07.12.2008 19:37:02
Thread-ID: 1030899
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
12
2
7
2
4
5
6
4
2
5
9
9
2
2
5
5
7
2
4
2
1
1
7
8