Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 10:55:14
Zeilen sortieren
23.04.2024 10:23:52
Tabelle 90° drehen + Filteroptionen
23.04.2024 10:11:03
Dateiname plus Wenn vorhanden dann "(1)" anhängen.
23.04.2024 09:45:43
mehrere Bedingungen verknüpfen und mehr
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
668to672
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
668to672
668to672
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilen ausblenden wenn..........

Zeilen ausblenden wenn..........
23.09.2005 11:37:02
DieterL
Hallo Excelfreunde,
ich habe in einem Programm einen Kalender eingebaut der von A5 bis A35 untereinander einen Monat anzeigt, den ich über eine ComboBox auswähle.
Die gelinkte Zelle ist L9 und ist als Datum, nur Monat formatiert während die Zellen A5 bis A35 das lange Datumsformat haben.
Nun hat aber nicht jeder Monat 31 Tage und so wird im September z.B. als 31. Tag der 1. Oktober angezeigt. Ich möchte per VBA die Zellen A33, A34 und A35 mit der Zelle L9 vergleichen und bei nicht Übereinstimmung des Monats ausblenden. Als Ereignis nehme ich ComboBox1_Cange. Alle meine Versuche in dieser Richtung sind bisher gescheitert, da ich in VBA noch nie mit Datum gearbeitet habe. Ich hoffe es hat jemand einen brauchbaren Tip für mich!
Gruß DieterL

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen ausblenden wenn..........
23.09.2005 13:06:35
Uduuh
Hallo,

Sub ausblenden()
Dim iLastDay As Integer, dteDatum As Date
Range(Rows(30), Rows(35)).Hidden = False
dteDatum = Range("A5")
iLastDay = Day(DateSerial(Year(dteDatum), Month(dteDatum) + 1, 0))
Range(Rows(iLastDay + 5), Rows(35)).Hidden = True
End Sub

Gruß aus’m Pott
Udo

Geht noch nicht...
23.09.2005 13:51:18
DieterL
Hallo Udo,
Dieses Makro blendet mir immer Zeile 35 und 36 aus auch wenn der Monat 31 Tage hat.
Meine Zellen von A5 bis A35 sind im Format TTTT TT.MM.JJJJ. Ich will jetzt nur vergleichen ob der Monat in den Zelle A33, A34, A35 dem Monat in Zelle A5 entspricht und wenn nicht die Zeile ausblenden. Ab Zelle A33 wegen Februar, der ja mal 28 un mal 29 Tage hat.
Gruß DieterL
Anzeige
AW: Geht noch nicht...
23.09.2005 14:23:02
Peter
Servus,
dann versuchs so. Bei deinem Level kannst du die notwendigen Änderungen (z.b. Range) selber vornehmen.
Sub t()
Dim intMonat As Integer, intTag As Integer, intStart As Integer
With Sheets("Tabelle1")
intMonat = .Range("B1")
intStart = 3
.Range(.Rows(intStart), .Rows(31 + intStart - 1)).Hidden = False
Select Case intMonat
Case 4, 6, 9, 11: .Rows(31 + intStart - 1).Hidden = True
Case 2: .Range(.Rows(29 + intStart - 1), .Rows(31 + intStart - 1)).Hidden = True
End Select
End With
End Sub

MfG Peter
Jetzt gehts
23.09.2005 14:52:48
dieterL
Danke!!

314 Forumthreads zu ähnlichen Themen

Löschen von Zeilen unter 1 Bedingung
Zeilen

Hallo,
ich habe in einer Excel Liste Produkte geführt, die den aktuellen Lagerbestand anzeigen.
Dort werden auch die Produkte aufgeführt, deren Produkte einen Lagerbestand von 0 haben.
Der Lagerbestand wird in Spalte B aufgeführt, die Produkte stehen in Spalte A. Der Datenbereich b...
08.08.2008 20:15:00
Thread-ID: 1000407
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
Zeile ausblenden, wenn in einer Zelle ein bestimmt
Jakob

Hallo,
Ich habe folgendes Problem:
Ich möchte in den Tabellenblatt "Form3" die zeilen 39-50 ausblenden wenn die Zelle A37 ungleich "Pentax" und "Ciclox" ist. Der Wert der Zelle A37 kommt aus der Eingabe im Tabellenblatt "Eingabemaske" (B7).
Wie müßte der entsprechende VBA-Code ausse...
03.09.2008 17:24:21
Thread-ID: 1007176
6 Beiträge
Anzeige
Zeilen ausblenden wenn...
Andreas

Hi,
ich habe ein kleines Problem. Auf meinem Excel-Blatt sind von B4:B200 Datumswerte im Format TT.MM.JJJJ eingetragen. In der Zelle A1 gebe ich nun beispielsweise Januar ein. Ich will nun, dass alle Zeilen ausgeblendet werden, die nicht in der Spalte B ein Januar-Datum eingetragen haben. D...
04.09.2008 20:18:36
Thread-ID: 1007507
10 Beiträge
in einer Spaöte leere Zellen ausblenden
medion53

Hallo, vielleicht kann mir jemand helfen...
Ich habe eine Tabelle A, gefüllt mit Werten bzw Formeln, die Tabelle A verwende ich als Liste für Datengültigkeit. leider bekomme ich die Leerzellen nicht weg...habe gegoogelt und eine Formel gefunden.
http://www.excelformeln.de/formeln.html...
05.09.2008 10:40:00
Thread-ID: 1007607
7 Beiträge
bestimmte Zeilen per Makro ausblenden
Fritz_W

Hallo Forumsbesucher,
ich bitte die VBA-Kundigen unter euch um Hilfe.
Mit welchem Makro kann ich in einer geöffneten Tabelle alle Zeilen ausblenden, in denen in Spalte B ein Datumseintrag steht, der vor dem jeweils heutigen Tag liegt?
Vielen Dank für eure Hilfe
mfg
Fritz
05.09.2008 10:57:00
Thread-ID: 1007611
3 Beiträge
Formel in Zelle per VBA einfügen
Werner

Wie kann ich Statistikformeln (Mittelwert, Maximum, Minimum, Standardabweichung) per VBA in eine Zelle einfügen?
Der zu berechnende Bereich geht von "$J$1" bis "$J$n" wobei n mit ActiveCell.Row-2 zuvor berechnet wird.
Gruß Werner.
10.09.2008 14:17:46
Thread-ID: 1008801
5 Beiträge
Leere(nur Formel drin) Zellen in Diagramm
Volker

Hallo,
ich habe ein Problem und hoffe auf Eure Hilfe!
Ich habe mit Excel2007 (wahrscheinlich besteht das Problem auch in anderen Versionen) ein Diagramm erstellt. Es werden dabei 2 Datenreihen angezeigt. Soweit so gut...
Reihe 1 bildet sich aus 10 Werten, von denen der erste Teil vo...
25.09.2008 16:11:00
Thread-ID: 1012372
6 Beiträge
Anzeige

Links zu Excel-Dialogen

ComboBox

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
13
2
5
7
9
6
2
4
5
10
9
3
5
2
6
3
2
6
2
5
5
7
8
5