Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 11:16:38
Pfade werden mit Anführungszeichen "" versehen
18.04.2024 11:09:53
for Schleife lässt leere Zeilen bei Abfrage mit Bedingung
18.04.2024 10:30:26
bedingte Formatierung lange Zahlen
18.04.2024 09:22:48
VBA Filter in intelligenter Tabelle funktioniert nicht
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
700to704
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
700to704
700to704
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

automatisch letztes Blatt (ohne VBA) in Bezug

automatisch letztes Blatt (ohne VBA) in Bezug
01.12.2005 15:50:12
Günter
gebe zu der Betreff klingt abenteuerlich ..
Also :
folgende Formel nutze ich, um Daten aus einer anderen Excel-Datei einzulesen :
=WENN(C9&gt$E$5;F9;SUMMEWENN('I:\CATI\CATI_INFO\[Tagesreport 2005.xls]kw48'!$A$3:$A$154;A9;'I:\CATI\CATI_INFO\[Tagesreport 2005.xls]kw48'!$H$3:$H$154))
Wie man der Formel entnehmen kann, greife ich dort auf ein bestimmtes Tabellenblatt zu (die aktuelle Kalendarwoche...ist also stets das letzte Tabellenblatt)...wie kann ich (ohne VBA) obige Formel ändern, dass ich nicht jede Woche den Bezug ändern muss (also kw48 in kw49, etc.) ?
Oder geht das nur über VB, wenn ja..wie ?
Danke für Eure Hilfe !!

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: automatisch letztes Blatt (ohne VBA) in Bezug
01.12.2005 16:45:45
Reinhard
Hi Günter,
die Funktion habe ich mit der auskommentierten For-Schleife getestet, funktioniertund erzeugt 'I:\CATI\CATI_INFO\[Tagesreport 2005.xls]kw49'!
also müßte (ungetestet) die Formel so aussehen:
=WENN(C9>$E$5;F9;SUMMEWENN(indirekt(letzte() & "$A$3:$A$154";A9;indirekt(letzte() & "$H$3:$H$154"))
Function letztes()
Application.Volatile
For blatt = 1 To Workbooks("Tagesreport 2005").Worksheets.Count
'For blatt = 1 To ActiveWorkbook.Worksheets.Count
If Worksheets(blatt).Name Like "kw*" Then
If CInt(Mid(Worksheets(blatt).Name, 3)) > zahl Then zahl = CInt(Mid(Worksheets(blatt).Name, 3))
End If
Next blatt
letztes = "'I:\CATI\CATI_INFO\[Tagesreport 2005.xls]kw" & CStr(zahl) & "'!"
End Function
Gruß
Reinhard

Anzeige

270 Forumthreads zu ähnlichen Themen

Autofilter aus VBA liefert kein ergebnis
Karsten


Hallo liebe Forumsgemeinde,
ich habe ein Problem mit dem Autofilter, den ich mit folgendem Code "auslöse":
ActiveSheet.Activate
With ActiveSheet
.AutoFilterMode = False
.Range("A8:H8").AutoFilter
.Range("A8:H8").AutoFilter Field:=1, Criteria1:=">=" & Range("J...
20.03.2010 15:52:25
Thread-ID: 1147277
10 Beiträge
Anzeige
Button für VBA Code in Tabellenblatt
Manu

Hallo zusammen,
ich bräuchte mal wieder eure Hilfe.
1. Kann mir jemand sagen, wie ich ein Button (soll im Tabellenblatt sichtbar sein) über VBA programmiere, dass sich alle Daten (ausgenommen der Zeile 1) aus einem Tabellenblatt löschen lassen (so zu sagen mit einem Klick)!
2. Weiß...
22.07.2011 10:13:44
Thread-ID: 1223144
7 Beiträge
Cursor springt im VBA Editor
stollentroll

Hallo zusammen
Seit einigen Tagen verhält sich der VBA Editor in einem größerem Projekt seltsam.
Noch während des Tippens wird Text verschoben, der Cursor springt und es findet eine "Überprüfung" der aktuellen Zeile statt.
Aus a=" wird nach wenigen Sekunden a="", was noch harmlos i...
02.02.2012 11:33:35
Thread-ID: 1248928
3 Beiträge
Anzeige
In VBA Editor Tabellen umbenennen
Heinz

Guten morgen im Forum
Wenn ich den VBA Editor öffne sehe ich:
Tabelle 1 ("Jänner") Tabelle 2 ("Februar") usw..
Meine Frage: Hat das umbenennen von Tabelle 1 in "Jänner" irgend eine Auswirkung auf VBA Codes usw..?
Gruß
Heinz
30.11.2012 09:38:50
Thread-ID: 1288676
3 Beiträge
Automatische e-mail Abschickung VBA in Excel
Kazo

Hallo ich habe folgendes Problem: und zwar soll bei unten stehender VBA Programmierung nach dem _ Anfordern eine automatische email zugeschickt werden, sodass man nach dem Antragstellen nichts weiteres mehr machen muss und wie gesagt die email automatisch von selber zugeschickt wird! Vielen Da...
24.04.2014 08:09:53
Thread-ID: 1358408
9 Beiträge
In VBA Autofilter mit spitzer Klammer setzen
Chris

Hallo allerseits,
in einer Tabelle habe ich eine Spalte mit Autofilter. Die Werte des Autofilters sind Höhenangaben wie z.B. "1 m", "2 m", aber es kommt auch der Wert "> 5 m" vor, sprich größer wie 5 Meter.
In VBA setze ich den Autofilter mit der Variable "wert"
ActiveSheet.Range...
05.12.2014 11:21:09
Thread-ID: 1396296
3 Beiträge
Code läuft nicht als Add-In, nur in VBA-Editor
Hans-Werner

Liebe VBA-Gemeinde,
habe wieder mal ein VBA-Problem mit Programm-Code, der im VBA-Editor einwandfrei läuft, aber nicht ganz so, wenn Code als Add-In oder Makro aufgerufen wird:
In meiner Excel-Tabelle sollen aus dem Inhalt der Spalten 1-20 (variabel, auch 1-15) über Auswertung diverser...
23.05.2015 15:52:15
Thread-ID: 1427467
6 Beiträge
Wie kann ich in VBA prüfen ob eine Zelle ein ListO
Lukas

Hi, wie kann ich in VBA prüfen, ob eine Zelle ein Listobject ist oder nicht? Danke für die Antworten schon im Voraus!
14.05.2016 15:55:28
Thread-ID: 1493315
8 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
9
3
6
2
2
2
8
2
5
7
17
5
2
3
5
1
4
1
1
7
1
2
2
2
4