Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
600to604
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
600to604
600to604
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

tabellen manat anlegen aktueller monat anzeigen

tabellen manat anlegen aktueller monat anzeigen
22.04.2005 08:04:44
roland_k
hi zusammen
ich will in ner mappe bei workbook open
12 tabellen anlegen mit den monatsnamen jan feb usw bis dez
diese sollen aus der tabelle "monat_vorlage" gebildet werden
es soll aber nur die tabelle mit dem aktuellen monat eingeblendet sein
das anlegen aus ner vorlage habe ich schon aber wie gebe den namen manat?
irgendwie muss da month oder so was stehn ?
sorry wenn die frage trivial erscheint hmmm
danke euch, wenn sich trotzdem jemand due muehe macht das zu beschreiben
gruss roland_k

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: tabellen manat anlegen aktueller monat anzeige
22.04.2005 08:48:25
Michel
Hi,
guckst du hier:
Dim i As Integer
Dim intmonth As Integer
Dim wks As Worksheet
'Monate anlegen
For intmonth = 1 To 12
Worksheets.Add.Move after:=Worksheets(Worksheets.Count)
ActiveSheet.Name = Format(DateSerial(2005, intmonth, 1), "mmmm")
Next intmonth

Sheets(Format(Date, "mmmm")).Select
bis denne
Michel
AW: tabellen manat anlegen aktueller monat anzeige
22.04.2005 10:37:36
roland_k
hi michel danke das funkt
das mit einblenden .....und ausblenden weiss ich mit activesheet. visible = false
hmm wie sage ich ihm den aktuellen monat ?
sheets.name = ? will den aktuellen monat ----visible = true machen ?
hast du das kurz zur hand ...grrrrrrr irgendwie sollte das mit month ...gehn?
danke dir erst mal ...das anlegen funt jedenfalls
gruss roland _k
Anzeige
AW: tabellen manat anlegen aktueller monat anzeige
22.04.2005 10:46:56
Michel
Hmm.... jetzt komme ich nicht ganz mit!
Visible=True heißt doch nix anderes, als das du es HIER aktivieren willst, oder täusche ich mich jetzt?
Dann reicht doch die Select Funktion... Kläre mir mal auf...
Michel
alle ausblenden bis auf aktuellen monat
22.04.2005 11:12:10
roland_k
hi michel
habe das nicht richtig erklärt ((
bin gerade am einbauen tabellen leg er nu aus vorlage an (vorlage_monate)
hieraus jeweils ein blatt mit der vorlage kopiert und dann in monate jan..feb ..usw
nu will ich alle ausblenden nur den akt monat nicht
wenn das so nicht klar ist kann auch mein beispielmappe kurz hochladen
danke dir gruss roland_k
Anzeige
AW: alle ausblenden bis auf aktuellen monat
22.04.2005 12:59:07
Michel
Asu.... :-p
guckst du:
Frage einfach ab...
For Each wks In Worksheets
If wks.Name Format(Date, "mmmm") Then
wks.Visible = xlSheetVeryHidden
Else
'nix
End If
Next wks

303 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige