öffentlich
Redaktion Druckversion

VBA für Einsteiger - MS Excel 2003 (1)

Ausblick

Dieses Seminar vermittelt nur einen ersten Eindruck. Sie haben einige grundlegende Begriffe und Tätigkeiten erlernt. Das folgende Beispiel nun soll auf Weiteres neugierig machen.

Erweitern Sie die Prozedur Geburtstage auf diesen Programmcode (ohne Kommentare) inklusive der Prozedur ausblenden:

Sub Geburtstage()

Application.ScreenUpdating = False ' Der Bildschirm wird nicht mehr aktualisiert

' Das Pogramm wird schneller

' und der Bildschirm flackert nicht

' während der Arbeit des Programms

ActiveWorkbook.CustomViews("Geburtstage").Show

Call nach_Namen_sortieren ' Die Prozedur nach_Namen_sortieren wird aufgerufen

Call ausblenden ' Die Prozedur ausblenden wird aufgerufen

Application.ScreenUpdating = True ' Der Bildschirm wird wieder aktualisiert

End Sub

Sub ausblenden()

Dim Gebdat As Range ' Eine Bereichsobjektvariable Gebdat wird vereinbart

' Eine unbekannte Anzahl von Zellen

' einer Spalte auswerten

' Spalte auswählen und "Tiefe" ermitteln

' Der Objektvariablen Gebdat zuweisen

Dim Zelle As Range ' Eine Bereichsobjektvariable Zelle wird vereinbart

Set Gebdat = Range("R3", Range("R3").End(xlDown))

' Bereichsobjekt auswerten

For Each Zelle In Gebdat

'Nur Tabellen-Zeilen der Geb.-Daten des aktuellen Datums werden angezeigt

If Month(Zelle) = Month(Now) Then

'Zeile nicht ausblenden, wenn Monat des Geburtstages gleich Monat aktuelles Datum

Zelle.Rows.Hidden = False

Else

'Zeile ausblenden, wenn Monat Geburtstag ungleich Monat aktuelles Datum

Zelle.Rows.Hidden = True

End If

Next

End Sub

Die Behandlung der im letzten Beispiel angeführten Objekte, Steueranweisungen für Entscheidungen im Programm, Unterprogrammtechnik, einige eingebaute Funktionen und viele interessante Themen werden in weiteren Seminaren folgen.

Mitglied werden, Vorteile nutzen!

  • Sie können alles lesen und herunterladen: Beiträge, PDF-Dateien und Zusatzdateien (Checklisten, Vorlagen, Musterbriefe, Excel-Rechner u.v.a.m.)
  • Unsere Autoren beantworten Ihre Fragen

Inhalt

Downloads zu diesem Beitrag

Über den Autor:

bild117282

Dieter Frommhold, Jahrgang 1943, Diplom-Lehrer für Physik und Mathematik, Verlagslektor und Programmierer. Seit 1971 langjährige Lehrtätigkeit über Betriebssysteme und Programmierung.

Ab 1994 arbe ...

Newsletter abonnieren