VBA

Ein weiteres Akronym Namens VBA geistert seit längerer Zeit in der Welt der IT, aber auch im Büroalltag umher.

Besonders Büroangestellte nutzen VBA häufig in Kombination mit den Microsoft Office Produkten, teilweise auch ohne es aktiv zu wissen.

Doch was ist dieses VBA „Ding“ denn nun, wofür wurde es erfunden und was macht man damit genau?

Was ist VBA?

VBA ist wie oben schon eingängig erwähnt ein Akronym, also eine Abkürzung für die Wörter „Visual Basic for Applications„.

Was irgendwie nach einer Art Brillenputzmittel, bzw. Auflage auf Brillen klingt, ist in Wahrheit eine Skriptsprache.

Diese Skriptsprache wurde von der Firma Microsoft unterstützend zu vielen Ihrer Office Produkte, wie z. B. Excel und Word entwickelt.

Wofür VBA?

Da wir nun verstanden haben wo VBA eingesetzt wird, also bei bestehenden Produkten wie z. B. Microsoft Excel, schauen wir uns nun dessen Verwendung an.

Meiner persönlichen Erfahrung nach, denken viele Kenner sofort an Excel, wenn sie das Stichwort „VBA“ hören, nicht ohne Grund.

Auch wenn die Microsoft Office Produktfamilie natürlich über einen sehr großen Funktionsumfang verfügt, hat man häufig individuelle Wünsche.

Neben den individuellen Wünschen spielt natürlich auch z. B. die Automatisierung von gewissen Prozessen eine große Rolle.

Wer hat schon Lust, die häufig an Praktikanten verteilte Arbeit zu übernehmen und sich dumm und dusselig zu klicken.

Dafür könnte man sich einige kleine Skripte in VBA bauen, Die einem dann diese unangenehme Arbeit abnehmen, oder zumindest erleichtert.

Was ist nun das VB in VBA?

Nun kommst Du ggf. mit deinen Englischkenntnissen an den Punkt, wo Du die Bedeutung des „..for Applications“ verstanden hast.

Denn wie erklärt, erweitert man bestehende Office-Programme durch VBA um seine individuell gewünschten Programm–Funktionen.

Was dabei allerdings noch offen bleibt ist dieser Teil namens „Visual Basic“ in VBA.

Visual Basic (Classic) – oder auch kurz „VB“ – ist die Programmiersprache worauf VBA letztendlich basiert.

Sie ist der Vorreiter für die Sprache, weshalb diese Webseite vor vielen Jahren überhaupt entstanden ist – Visual Basic NET.

Einsatzbeispiel für VBA

Wie oben bereits erwähnt gibt es teilweise Situationen in denen man sich gerne ein Skript für wiederkehrende Arbeiten erstellen möchte.

Damit könnte man nach initial investierter Zeit, zukünftig ein Vielfaches dieser Arbeitszeit und Arbeitskraft sparen und vereinfachen.

Schauen wir uns dafür in diesem Abschnitt einmal ein kleines Beispiel an, wo wir so eine individuelle Erweiterung genauer betrachten.

Das Beispiel in all seinen vollständigen Details findest Du im Beitrag „Serienbrief mit Ecxel„, ich werde hier die wesentlichen Schritte wiederholen.

Dabei ergänze ich einige Sachen, Welche zu diesem Beitrag hier besser passen und daher einfacher nachvollziehbar sind.

Das Dilemma mit den Adressen

Jeder der schonmal in seinem Leben mit Adress-Daten gearbeitet hat, kennt das dahinter steckende Dilemma.

Mal werden Postleitzahl und Ort vertauscht, hier und da ein Leerzeichen zu viel und und und.

Manchmal fragt man sich wirklich, wie Diese herauskommenden Daten letztendlich zustande kommen.

Ich selbst kenne das aufgrund einer ehemaligen Arbeitskollegin aus einen vergangenen Job sehr gut.

Monkey Work als Beispiel – Kein Einzelfall

Sie war den ganzen Arbeitstag (!) damit beschäftigt, Adressen zu korrigieren und aufzuarbeiten – schrecklich.

Leider ist das absolut kein Einzelfall, auch bei einem ehemaligen Kunden kannte ich Mitarbeiter, die dieser Arbeit nachkamen.

Oftmals ist es in solchen Unternehmen leider die Folge von fehlendem Budget für individuelle Entwicklungen.

Manchmal meint man auch, man könne sich dafür keine Zeit nehmen „..ich muss schließlich mein Tagesgeschäft fortführen..“.

Fangen wir lieber nicht die mentale Debatte an, ob diese Vorgehensweisen so sinnvoll waren..

Fokussieren wir uns stattdessen lieber auf das ursprüngliche Problem, eine kleine Funktionalität zur Korrektur von Adressen zu erstellen.

Natürlich werde ich hier nur ein kleines Beispiel machen, da es nicht um die Funktionalität geht.

Mir geht es hier besonders um das Verständnis über die Einsatzmöglichkeiten von VBA.

Tabellenstruktur & Beispieldaten

Schaue Dir am besten einfach mal folgende Tabellenstruktur und die darin befindlichen Daten an:

Dir fällt sehr wahrscheinlich der falsche Datensatz in der dritten Zeile auf.

Dort wurde bei der Eingabe (aus welcher Quelle auch immer), leider die Postleitzahl mit dem Ort vertauscht.

Natürlich könnten wir bei diesen wenigen Einträgen auch eine manuelle Korrektur durchführen.

Wenn ich allerdings an den erwähnten Kunden denke, dann hatte man mit ungefähr 200 Bestellungen am Tag ein Problem.

Lösungsansatz

Wenn wir nun über einen möglichen Lösungsansatz nachdenken, könnte man wie folgt vorgehen.

Man geht das aktive Tabellenblatt bei z. B. einem Klick eines Buttons mit einer Schleife durch.

In jedem Schleifendurchlauf prüft man, ob z. B. im Ort Zahlen enthalten sind.

Vermutlich gibt es hier noch andere Ansätze, allerdings reicht das für unser Beispiel aus.

Meine Gedanken dabei waren, dass in einem Ort definitiv keine Zahlen vorkommen und eine Postleitzahl soweit ich weiß in einigen Gebieten auch Buchstaben enthalten kann.

Im Endeffekt kann man das ja je nach individuellem Wunsch anpassen, bzw. verändern.

Code

In diesem Abschnitt schauen wir uns den möglichen Code für die oben genannte Variante an.

Der erste Bestandteil ist wie erwähnt das Durchlaufen der Zeilen, des aktiven Tabellenblatts:

Dim rowRange As Range
For Each rowRange In ActiveSheet.UsedRange.Rows
  ' mach was mit der Range namens rowRange
Next

Danach könnten wir einstellen, dass die Reihe nur verarbeitet wird, wenn beide notwendigen Datenfelder ausgefüllt sind.

Dazu benutze ich wie immer gerne, ein so genanntes „Early Return„, ich weise die Schleife in den nächsten Durchlauf, statt If-Konstrukte tief zu verschachteln:

Dim zipText As String
zipText = ActiveSheet.Cells(rowRange.Row, 1).Text
Dim hasNoZip As Boolean
hasNoZip = zipText = ""

Dim cityText As String
cityText = ActiveSheet.Cells(rowRange.Row, 2).Text
Dim hasNoCity As Boolean
hasNoCity = cityText = ""

If hasNoZip Or hasNoCity Then
  Continue For
End If

Zum Schluss können wir dann unsere Prüfung und die Tausch-Arbeit selbst durchführen.

Dazu könnten wir auf komplizierte „Regular Expressions“ zurückgreifen, jedoch bin ich ein Fan von „KISS„, daher verwenden wir einfach den „Like“-Operator:

Dim cityContainsNoNumber As Boolean
cityContainsNoNumber = cityText Not Like "*[0-9]*"
If cityContainsNoNumber Then
  ' wieder early return / Continue
  Continue For
End If

Im letzten Schritt folgt der Tausch der Werte:

ActiveSheet.Cells(rowRange.Row, 1).Text = cityText
ActiveSheet.Cells(rowRange.Row, 2).Text = zipText

Kompletter Code

Hier findest Du noch einmal den vollständigen Code, um die PLZ mit dem Ort/der Stadt zu tauschen, wenn die Stadt eine Zahl enthält:

Dim rowRange As Range
For Each rowRange In ActiveSheet.UsedRange.Rows
  Dim zipText As String
  zipText = ActiveSheet.Cells(rowRange.Row, 1).Text
  Dim hasNoZip As Boolean
  hasNoZip = zipText = ""

  Dim cityText As String
  cityText = ActiveSheet.Cells(rowRange.Row, 2).Text
  Dim hasNoCity As Boolean
  hasNoCity = cityText = ""

  If hasNoZip Or hasNoCity Then
    Continue For
  End If

  Dim cityContainsNoNumber As Boolean
  cityContainsNoNumber = cityText Not Like "*[0-9]*"
  If cityContainsNoNumber Then
    Continue For
  End If

  ActiveSheet.Cells(rowRange.Row, 1).Text = cityText
  ActiveSheet.Cells(rowRange.Row, 2).Text = zipText
Next

Wo den Code unterbringen?

Damit Du den Code von oben verwenden kannst, muss er natürlich irgendwo untergebracht werden, damit er auch ausgeführt wird.

Das passiert in Excel z. B. häufig durch sogenannte Makros, wie Du auch in diesen Beiträgen erfahren konntest: Excel Makros erstellen, oder Excel Makro Button.

Fazit – VBA

In diesem Beitrag hast Du gelernt, wie Du dein Erlebnis von Office Produkten wie z. B. Excel verbessern kannst.

Dies geschieht durch die auf der Visual Basic (Classic) basierenden Skriptsprache namens Visual Basic for Applications, oder kurz „VBA„.

Diese Verbesserungen können in Form von zusätzlichen Funktionen, oder auch in Form von konkreten arbeitserleichternden Mitteln existieren.

Downloads

Der Beitrag VBA erschien zuerst auf Robert Skibbe.

Excel Kalenderwoche

Du möchtest eine Excel Kalenderwoche bestimmen, um zum Beispiel diverse Projekte wie einen Kalender, o. Ä. umzusetzen?

Dann begrüße ich Dich herzlich in meinem heutigen Beitrag über die Kalenderwoche, bzw. die Kalenderwochen-Funktion in Excel!

Vielleicht helfen Dir später auch noch weitere Beiträge zum Thema Microsoft Excel, wie Diese hier: VBA Makro, Range, IFS VBA.

Kalenderwochen – Häufig gebraucht

Ich denke absolut jeder, der mal mit Daten (plural Datum) gearbeitet hat, ist früher oder später an ein und dasselbe Problem geraten – Kalenderwochen.

Diese Problemstellung ist wie viele Andere auch, nicht plattformabhängig, da z. B. Kalender nun einmal auf verschiedenen Plattformen gebraucht werden.

Was jedoch Plattform– und auch kontextual–abhängig ist, sind deren jeweilige Umsetzungen auf den entsprechenden Plattformen.

Google-Kalender – Ein Beispiel

Neben Microsoft Outlook verwenden natürlich auch andere bekannte Anbieter wie z. B. Google die Darstellung von Kalenderwochen.

Bei Outlook muss man Diese teilweise (also je nach Version und Einstellungen) allerdings erst aktivieren.

Auf dem Handy sehe ich aktuell auch in der Monatsansicht z. B. keine Kalenderwochen (ich nutze aktuell ein iPhone XR mit dem iOS-Kalender).

Excel Kalenderwoche, etwa berechnen?

Im Internet finden sich für die verschiedensten Sprachen und Plattformen Codeschnippsel, wie man die Kalenderwoche eines gegebenen Datum berechnen kann.

Wie man Kalenderwochen errechnet, bzw. bestimmt ist ja mehr oder weniger ein offenes Geheimnis, denn wie fast alles im Leben, gibt es auch hierfür Normen.

Unter anderem gibt es die für uns eher interessante Norm „ISO8601“ und die z. B. in den USA vertretene Norm.

Zum Glück gibt es aber zumindest einige Hilfsmittel, Welche es uns ermöglichen, auf vorhandene Tools zurückzugreifen, statt alles in Eigenarbeit zu berechnen.

Das sieht dann je nach Programmier– und Skriptsprache ggf. anders aus und ist mal mehr und mal weniger kompliziert.

Hier siehst Du beispielsweise ein ISO8601–Beispiel aus dem VB.NET-Umfeld:

Public Shared Function GetIso8601WeekOfYear(time As DateTime) As Integer
    Dim day As DayOfWeek = CultureInfo.InvariantCulture.Calendar.GetDayOfWeek(time)

    If day >= DayOfWeek.Monday AndAlso day <= DayOfWeek.Wednesday Then
        time = time.AddDays(3)
    End If

    Return CultureInfo.InvariantCulture.Calendar.GetWeekOfYear(time, CalendarWeekRule.FirstFourDayWeek, DayOfWeek.Monday)
End Function

Durch Verwendung von VBA-Code

Wer im Bereich Excel unterwegs ist, wird vermutlich auch irgendwann in Kontakt mit Microsofts Skriptsprache Visual Basic for Applications (kurz VBA) kommen.

Auch dort könnte eventuell die Notwendigkeit für die Erörterung der Kalenderwoche eines bestimmten Datums vorkommen.

In VBA selbst gibt es dazu eine relativ einfache Funktion, Welche sich in der Dokumentation unter dem Namen „WeekNum“ versteckt.

Ein möglicher Beispielcode dazu könnte so aussehen:

Dim weekNumber As Integer = WorksheetFunction.WeekNum(now, vbMonday)
' do something with weekNumber..

Gerade und ungerade Kalenderwochen

Eventuell besteht ja auch die Notwendigkeit zum Beispiel in „geraden Kalenderwochen“ anders zu verfahren, als in Ungeraden.

Womöglich möchte man die Reihen, oder Spalten anders färben, oder die Werte innerhalb der Zellen anders verarbeiten.

Dies könnte man z. B. wie folgt lösen:

Dim weekNumber As Integer = WorksheetFunction.WeekNum(now, vbMonday)
Dim isWeekNumberEven As Boolean = weekNumber Mod 2
If isWeekNumberEven Then
    ' do something on even weeknumber..
Else
    ' do something on odd weeknumber
End If

Excel Kalenderwoche – Einfachste Methode

Ganz nach dem „das Beste kommt zum Schluss„-Motto, gibt es in Excel wohl (zum Glück) eine sehr einfache Variante, um an die Kalenderwoche zu kommen.

Dazu verwendet man die gleichermaßen benannte Methode namens KALENDERWOCHE – einfach, oder!?

Dessen genauen Aufbau mit Parametern und Details, kannst Du Dir in der oben verlinkten Seite der Dokumentation anschauen.

Achte bei dem folgenden Code-Beispiel besonders auf den zweiten Parameter, Dieser gibt eine wichtige Information an.

Der zweite Parameter der Funktion bestimmt dabei, an welchem Wochentag die Woche(n) für die Berechnung starten soll.

Beim ersten Parameter hingegen handelt es sich um den jeweiligen Wert (also das Datum), Welcher verwendet werden soll.

Dabei handelt es sich im unteren Beispiel natürlich um den Wert in der Zelle „A2„.

=KALENDERWOCHE(A2;2)

Der Beitrag Excel Kalenderwoche erschien zuerst auf Robert Skibbe.

VBA in Excel öffnen

Du möchtest VBA in Excel öffnen und mit der Programmierung von Excel-Hilfsmitteln durch Visual Basic for Applications loslegen?

Erfahre in meinem heutigen Beitrag, wie Du einfach und schnell durchstarten kannst!

Vielleicht schwenkt Dein Interesse nach diesem Beitrag noch auf folgende ähnliche Beiträge: IFS VBA, VBA For Schleife, InStr.

Was ist VBA?

Bevor wir uns mit dem Kern beschäftigen, also wie wir VBA in Excel öffnen können, schauen wir uns einmal genauer an was VBA überhaupt ist.

Falls Du frei nach dem Motto „TL;DR; (Too Long Didn’t Read)“ direkt zum Ort des Geschehens hüpfen möchtest, scrolle einfach ein wenig runter.

Ich denke allerdings, dass vor allem Anfänger sich die obige Frage stellen und sich ein wenig Einführung, bzw. Wiederholung nicht schaden kann.

Microsoft Excel

Wenn man an Bürojobs aus fast egal welcher Branche denkt, denkt man meistens auch an die Office-Produktfamilie von Microsoft.

In so gut wie jeder ausgeschriebenen Stellenanzeige werden zumindest Grundkenntnisse erwartet, da Sie ein elementarer Grundbaustein sind.

Egal ob im Bereich Transporte, Network-Marketing, oder sonst irgendwo, fast überall sind die bekannten Office-Produkte wie Word, Excel und Outlook im Einsatz.

Häufig gibt es allerdings Aufgaben und bestimmte Einsatzfelder, wo diverse Tätigkeiten wiederholt werden müssen.

Ebenso saß man als Nutzer der Produkte vermutlich schon selbst an dem Punkt, wo man gerne die eine oder andere Funktion mehr gehabt hätte.

VBA zur Rettung

Genau an dieser im vorherigen Abschnitt erwähnten Stelle kommt dann Visual Basic for Applications – oder kurz VBA – ins Spiel.

Was im ersten Moment eventuell wie ein Werkzeug zum Zeichnen o. Ä. klingt, ist in Wahrheit eine Skriptsprache.

Wie der Name auch schon ggf. vermuten lässt, ist Diese auf die Verwendung innerhalb von bestehenden Anwendungen konzipiert.

Um genau zu sein handelt es sich bei diesen Anwendungen exakt um die vorher angesprochenen Produkte wie Word, Excel und Co.

Wir können mit VBA die vorhandenen Funktionalitäten der einzelnen Programme erweitern und uns so eine individuell größere Palette an Werkzeugen bauen.

So hat jeder VBA-Nutzer die Möglichkeit, sich seine ein wenig mehr auf sich zurechtgeschnittene Arbeitsumgebung zu schaffen.

Dabei ist es besonders toll, dass durch diverse Funktionen wie z. B. das Aufnehmen von Makros, nicht zwangsweise Programmierkenntnisse notwendig sind.

Natürlich sind Diese jedoch von Vorteil und vereinfachen Vieles, wie die Anpassung und Erweiterung der Skripte, usw.

VBA in Excel öffnen – Das Beispiel

Letztendlich kann man VBA, bzw. genauer genommen den VBA-Editor in Excel auf unterschiedliche Wege öffnen.

Am einfachsten ist es, wenn man die Tastenkombination [ALT]-[F11] verwendet, um den VBA-Editor zu öffnen.

Achtung! Je nach Version des jeweiligen Programmes (Word, Excel, Outlook..), kann es kleine Unterschiede geben!

Eventuell musst Du vor dem Öffnen des Editors auch bereits ein Dokument, bzw. eine Tabelle geöffnet haben.

Über die grafische Oberfläche kannst Du zumeist auch die Schritte über das Menüband gehen.

Wenn es nicht funktioniert

Falls Du mit den hier drüber genannten Schritten nicht weiterkommst, kannst Du überprüfen, ob Dir die Sicherheitseinstellungen im Weg sind.

Gehe dazu am besten einmal in die Optionen deines Programmes und überprüfe den Punkt „Trust Center„, bzw. „Sicherheitseinstellungen„.

Dort findest Du eventuell mehr Informationen zum Thema Entwicklertools – worum es sich bei VBA ja handelt.

In den Optionen hast Du die Möglichkeit, die Entwicklertools zum Menüband hinzuzufügen, sowie Einstellungen zu Makros, etc. zu treffen.

Der Beitrag VBA in Excel öffnen erschien zuerst auf Robert Skibbe.

Excel Makro erstellen

Ein Excel Makro erstellen und damit eventuell deine Arbeit zu erleichtern, bzw. zu automatisieren ist Dein Ziel?

Dann ist es schön, dass Du auf dem Weg deiner Recherche zu meinem heutigen Beitrag gefunden hast, denn genau darum geht es heute!

Schaue gerne alternativ auch bei meinen anderen VBA Excel Beiträgen wie: Excel Makro Button, VBA For Schleife & Range VBA vorbei.

Was ist eigentlich ein Makro?

Ganz nach dem Motto „Back To The Roots“ schauen wir uns erstmal die Bedeutung eines Makros an und wofür man es letztendlich verwendet.

Makros sind vor allem im Bereich der Automatisierung von diversen Prozessen nicht wegzudenken, denn Sie können die alltägliche Arbeit erleichtern.

Sie sind für die Non-Programmierer vor allem aus dem Bereich Microsoft Excel und Co. bekannt und werden dort täglich eingesetzt.

Ein Makro ist letztendlich nichts Anderes als eine Sammlung von Anweisungen, praktisch also ein Zettel mit „Tu dies, tu jenes und danach dies & das“.

Ein Makro auslösen

Bevor wir uns der Erstellung des Makros widmen, schauen wir uns nochmal kurz vorher die Möglichkeiten zur Auslösung von Makros an.

Dazu können wir auf eher passive Ereignisse, bzw. Trigger warten, oder die aktive Varianten wie z. B. durch einen Button–Klick, oder Hotkey wählen.:

Varianten

• auslösen durch Hotkeys
• im Ladevorgang der Projektmappe
• im Code durch den Visual Basic Editor (VBE)
• und mehr..

Mit diesen Ausgangspunkten können wir uns nun im nächsten Schritt, die Erstellung eines Makros anschauen.

Vorbereitungen – Excel Makro erstellen

Oft bekommt man bei der ersten Arbeit mit Makros ein kleines „Problem„, Welches aber gar kein richtiges Problem, sondern eher ein Sicherheitsfeature ist.

Zumeist ist die Verwendung von Makros in Microsoft Excel Tabellen standardmäßig mehr oder weniger deaktiviert.

Wir müssen die mögliche Nutzung von Makros also erstmal aktivieren und das machen wir über die Optionen.

Makros aktivieren

Begebe Dich also nun unter den Punkt Datei->Optionen in die Optionen von Excel.

Achtung! Deine Optionen sehen eventuell anders aus, bei mir werden durch die Verwendung von Web-Office aktuell nur diese Optionen angezeigt.

Excel Optionen öffnen

Trust-Center & Einstellungen öffnen

Gehe anschließend auf den Punkt „Trust-Center“, oder manchmal auch „Sicherheitseinstellungen“ genannt.

Makroeinstellungen öffnen

Klicke auf den farblich markierten Button und öffne somit die Einstellungen des Trust-Centers.

Beachte natürlich die Hinweise hinter den einzelnen Optionen und öffne nur Dateien, dessen Absender Du kennst, bzw. vertraust!

Alternativ kannst Du zur gezeigten Methode auch für jede Mappe einzeln bestimmen, ob Du dessen Makros verwenden möchtest.

Diese Möglichkeit bietet Dir Excel eigentlich auch von selbst an, meist mit einem kleinen Popup.

Allerdings kann die bei häufiger Verwendung von Makros auch nervig werden, jedoch ist es die sicherere Variante.

Entwicklertools einbinden

Mit dem nächsten Schritt würde ich Dir auch gleichzeitig ans Herz legen, die Entwicklertools in dein Menüband von Excel einzubinden.

Auch hier erschaffst Du Dir so einen schnellen und einfachen Zugriff auf die eventuell notwendigen Tools.

Öffne auch hierzu wieder die Optionen von Excel und klicke links außen auf „Menüband anpassen„.

Danach kannst Du die Entwicklertools meist mit einer Checkbox auf der rechten Seite aktivieren.

Excel Makro erstellen – Die Praxis

Nachdem Du im letzten Schritt eventuell die Entwicklertools aktivierst hast, oder bereits aktiviert hattest, nutzen wir Diese auch gleich.

Klicke dafür in deinem Menüband auf die Entwicklertools und anschließend auf die Fläche namens Makros.

Gebe nun einen Namen für dein neues Makro ein und bestätige Diesen danach.

Im nächsten Schritt wird sich dadurch der VBA-Editor öffnen und schon einige Zeilen an Code zeigen.

Hier könntest Du nun den Code deines Makros eintragen und z. B. durch:

MsgBox("Yay, mein eigenes Makro!")

eine simple Messagebox anzeigen lassen.

Detailliertere Informationen findest Du auch in der offiziellen Dokumentation von Microsoft.

Der Beitrag Excel Makro erstellen erschien zuerst auf Robert Skibbe.

Excel Makro Button

Lasse mit einem Excel Makro Button eine vorgefertigte Kette von Anweisungen ausführen und deine Arbeit vereinfachen.

Wie Du einen solchen Button erstellst, um ein definiertes Makro aufzurufen lernst Du in meinem heutigen Beitrag zum Thema Excel VBA.

Vielleicht hast Du ja später noch Interesse an anderen Excel VBA Beiträgen: VBA For Schleife, MsgBox, Range.

Achtung! Bevor Du mit Makros durchstarten kannst, musst Du Sie vorher in Excel aktivieren!

Was sind Makros?

Nicht zu verwechseln mit dem slawischen, männlichen Vornamen „Marko“, ist ein Makro eine Folge von Anweisungen.

Besonders häufig, bzw. besonders beliebt sind Makros im Automatisierungsbereich in verschiedenen Kontexten.

Speziell die Arbeit mit Tabellen aus z. B. Microsoft Excel bietet die Erstellung und Verwendung solcher hilfreichen Makros an.

Dabei wird dem Nutzer nicht nur vorhandene und zukünftige Arbeit abgenommen, die Arbeit kann dadurch auch wesentlich effizienter gestaltet werden!

Makros ausführen

Um bereits erstellte Makros auszuführen kannst Du verschiedene Methoden verwenden, darunter:

Möglichkeiten

• durch eine Tastenkombination
• beim Öffnen einer Projektmappe
• aus dem Visual Basic Editor (VBE)
• und mehr..

In diesem Beitrag beschäftigen wir uns allerdings mit einem Button, also dem Ausführen eines Makros bei Klick auf einem Button.

Methode 1: Button als Form einfügen

Damit wir einen Knopf verwenden können, um ein jeweiliges „auf Ihm“ hinterlegtes Makro auszuführen, müssen wir diesen Knopf natürlich erst einmal hinzufügen.

Achtung! Je nach Excel Version kann sich die Menüführung unterschiedlich gestalten. Schaue auch ggf. in den Entwicklerwerkzeugen in Excel vorbei und prüfe vorher, ob du Diese aktiviert hast! Verwende für Excel-Sheets mit Makros auch die Dateiendung ".xlsm".

Einfügen Menü

Gehe dazu in das obere Menü von Excel und suche den Punkt „Einfügen„:

Abgerundetes Rechteck

Wähle anschließend aus, dass Du eine Form wie z. B. das abgerundete Rechteck einfügen möchtest:

Achtung! Auch hier nochmal der Hinweis auf unterschiedliche Excel-Versionen – Falls Du nicht fündig wirst, schaue doch mal ins Menü "Entwickler" (es muss erst aktiviert werden!)

Button gestalten

Danach kannst Du deinen Button, bzw. dein abgerundetes Rechteck so gestalten wie Du magst:

Makro an Button binden

Nachdem wir im vorherigen Schritt den Button an sich mit Einfügen eines abgerundeten Rechtecks erledigt haben, können wir Diesem nun das Makro zuweisen.

Klicke den Button dazu einfach mit der rechten Maustaste an und wähle „Makro zuweisen“ – fertig!

Nun kannst Du Dein definiertes Makro über den hinzugefügten und gestylten Button aufrufen!

Methode 2: Schaltfläche über den Entwickler-Tab einfügen

Die zweite – und oft bessere – Methode nutzt den Entwickler-Tab in Excel.
Damit erhältst Du eine echte Formular-Schaltfläche, bei der das Makro
direkt beim Erstellen zugewiesen wird.

Schritt 1: Entwickler-Tab aktivieren

Falls der Entwickler-Tab noch nicht sichtbar ist:
Datei → Optionen → Menüband anpassen → Entwicklertools aktivieren → OK.

Schritt 2: Schaltfläche einfügen

Wechsle in den Tab „Entwickler“ und klicke auf „Einfügen“. Unter „Formularsteuerelemente“ findest Du das Symbol für eine Schaltfläche (erstes Icon). Zeichne die Schaltfläche auf dem gewünschten Bereich im Sheet.

Schritt 3: Makro direkt zuweisen

Direkt nach dem Loslassen der Maus öffnet sich automatisch der Dialog „Makro zuweisen“. Wähle Dein Makro aus der Liste, oder erstelle ein neues direkt über „Neu“.

Ein einfaches VBA-Makro als Beispiel

Falls Du noch kein Makro hast, hier ein schnelles Beispiel zum Testen. Öffne den VBA-Editor mit Alt + F11, füge ein neues Modul ein und trage folgenden Code ein:

Sub MeinMakro()
    MsgBox "Makro wurde erfolgreich ausgeführt!", vbInformation, "Info"
End Sub

Weise dieses Makro anschließend Deinem Button zu — fertig. Beim Klick auf den Button erscheint eine Meldung als Bestätigung.

FAQ

Der Beitrag Excel Makro Button erschien zuerst auf Robert Skibbe.

VBA For Schleife

Du möchtest die VBA For Schleife zum Durchlaufen von z. B. Zellen verwenden, oder verstehen, was Schleifen sind?

Dann starte jetzt durch und lerne in meinem heutigen Beitrag alles Wissenswerte über das für die Programmierung essentielle Thema namens „Schleifen„.

Vielleicht möchtest Du zu einem späteren Zeitpunkt auch in meine folgenden anderen Beiträge reinschauen: MsgBox, Range, VBA Array.

Ein Teil der Infrastruktur

Schleifen sind in der Programmierung ein essentieller Teil der Infrastruktur und somit so gut wie in jeder Sprache ein häufig genutzten Basis-Werkzeug.

Nicht umsonst ist das so, denn wir müssen an verschiedenen Stellen im Programmablauf gewisse Dinge wiederholen.

Die Konditionen, bzw. Bedingungen für diese Wiederholungen können unterschiedlicher Natur sein und können sich während des Programmablaufs verändern.

Manchmal möchten wir Objekte durchlaufen, manchmal möchten wir Prozeduren und Sub-Prozeduren anhand einer gewissen Anzahl an Durchläufen wiederholen.

Nicht aus dem Luftverkehr

Anders als man eventuell als Nicht-Entwickler denken könnte, haben Schleifen in der Softwareentwicklung nichts mit „eine Schleife fliegen“ zu tun.

Okay, zugegebenermaßen wiederholen Flugzeuge ja beim Schleifen–Ziehen auch vermutlich gewisse Muster – insofern ich das beurteilen kann..

Daher läuft es zumindest ähnlich bei einer Schleife in der Softwareentwicklung ab, da auch dort gewisse Prozesse wiederholt, oder zumindest ähnlich abgearbeitet werden.

Denke z. B. an ein Kartenspiel

Stell‚ Dir mal ein gutes altes Kartenspiel wie z. B. Mau-Mau, oder auch Skip-Bo wenn Du möchtest vor.

Meistens werden in den gängigen Spielen aus einem vorhandenen Deck eine gewisse Anzahl an Karten gezogen.

Diese müssen natürlich einerseits aus dem Deck verschwinden und andererseits in Deine Hand aufgenommen werden.

So wie ich die Mau-Mau Regeln kenne, zieht jeder Spieler zu Beginn des Spiels 7 Karten aus dem Deck und sortiert Diese wie Ihm beliebt.

Dabei haben wir auch schon ein wichtiges Kriterium a la „7 Karten“ genannt, wir haben also eine Art Zähler.

Der Zähler gibt dabei an, wie oft der Inhalt der Schleife, also der „Zieh eine Karte“-Prozess wiederholt werden soll.

Dadurch wird der sogenannte Body (der Inhalt) der Schleife, anhand einer gewissen Anzahl von Wiederholungen ausgeführt.

Schleifen-Arten

In der Programmierung unterscheiden wir gängigerweise zwischen zwei verschiedene Arten von Schleifen. Die Ausführung, bzw. die genauere Steuerung des Schleifeninhalts kann unter Umständen variieren.

In einigen Fällen müssen wir eventuell erst ein bestimmtes Kriterium überprüfen und anschließend den Inhalt der Schleife ausführen.

In anderen Fällen müssen wir hingegen eventuell die Prüfung für die Ausführung an das Ende der Schleife verlagern.

Siehe Dir dazu das folgende Bild genauer an:

Wie in dem Teil hier drüber bereits angeschnitten, gibt es einerseits die zählergesteuerte Schleife. Die Anzahl der Wiederholungen einer zählergesteuerten Schleife wird anhand eines Zählers festgelegt. Der Zähler kann dabei natürlich aus unterschiedlichen Quellen wie z. B. einer Variable, oder eines Zellenwertes kommen.

Kopfgesteuerte Schleifen

Bei den Kopfgesteuerten Schleifen handelt es sich um ein Schleifenkonstrukt, Welches die Bedingung zur Ausführung im Kopf prüft.

Falls und auch nur wenn die Bedingung erfüllt ist, wird der Body, also der Inhalt der Schleife ausgeführt und anschließend wieder zum Kopf gesprungen.

Danach folgt eine erneute Prüfung und eine eventuelle neue Durchführung – eine Schleife ist geboren!

Fußgesteuerte Schleifen

Der nächste Schleifen-Typ wäre die fußgesteuerte Schleife, Welche analog zur obigen funktioniert.

Hierbei wird allerdings die Überprüfung der Bedingung erst im Fuß durchgeführt.

Das hat dann zur Folge, dass der Body der Schleife zuerst ausgeführt wird und erst im Fuß eine erneute Ausführung erörtert wird.

Der Bezug zum Code – VBA For Schleife

Fangen wir nun einmal an, mit dem folgenden Beispiel den konkreten Bezug zum Code herzustellen. Dabei ist es wichtig zu verstehen, in welchem Kontext die Schleifen arbeiten. Andererseits sollte man diverse gängige Fehler durch die Verwendung von Schleifen vermeiden.

Prozesse, bzw. Unterprozesse aufrufen

Viele anfängliche Excel-Programmierer verwenden Code wie gleich demonstriert. Sei es aus welchen Beweggründen auch immer: Unwissen, Unsicherheit, etc. Leider ist die dann entstehende Vorgehensweise wie wir gleich sehen werden, aus diversen Gründen nicht sehr vorteilhaft.

Stellen wir uns dafür vor, dass wir folgende 3 Unterprozesse haben, die zusammen letztendlich z. B. eine Email versenden sollen:

' Deck prüfen
' HandPrüfen
' das Karten ziehen selbst

Manuell mehrfach aufrufen

Falls man bisher noch keine Berührungspunkte mit Schleifen hatte, könnte man in die bekannteste Versuchung kommen (nicht seit es Schokolade gibt – wer die Werbung noch kennt!).

Dieser jemand würde also die obigen drei Schritte – hier einfach nur als Kommentare dargestellt – ggf. so aufrufen:

' Deck prüfen
' HandPrüfen
' das Karten ziehen selbst

' Deck prüfen
' HandPrüfen
' das Karten ziehen selbst

' .... pro Spieler wiederholen

Die Nachteile – bitte nicht machen!

Die dabei auftretenden Probleme stechen einem unerfahrenen Programmierer häufig nicht direkt ins Auge.

Folgeänderungen

Früher oder später wird man allerdings z. B. auf das Problem stoßen, dass Änderungen an Schritt 2 alle 5 Code-Blöcke betreffen.

Man müsste also um praktisch eine Sache zu ändern, 5 Punkte anpassen und je nachdem wie groß der jeweilige Punkt ist, hat man auch den Aufwand – würg!

Dieses Problem könnte natürlich durch den Bau einer Sub gelöst werden. Konzentriere dich hierbei bitte nicht zu sehr auf eine Art Implementierung, also die Vorgehensweise selbst. Versuche nach Möglichkeit den abstrakten Weg dahinter zu verstehen. Die konkrete Ausführung des Ziehens selbst ist hier eher irrelevant, viel mehr spielt die Struktur eine Rolle!

Sub KartenZiehen(anzahlKarten As Integer, spieler As Integer)
  ' Deck prüfen
  ' HandPrüfen
  ' das Karten ziehen selbst
  For i As Integer = 1 To anzahlKarten
    ' realisiere das Ziehen der Karten..
  Next
End Sub

Der Aufruf würde dann durch die Verwendung der Sub so aussehen:

KartenZiehen(7, 1)
KartenZiehen(7, 2)

Das ist natürlich auch nicht wirklich besser, wenn wir an das Beispiel mit dem Kartenspiel denken, denn allein die Formulierung macht es aus:

"..beim Start des Spiels, zieht jeder Spieler X Karten"

Duplicated Code

Ein weiteres Problem, Welches der obige Code ganz klar an den Tag legt, ist das Vorhandensein von „Duplicated Code„.

Wir wiederholen also bestehenden Code, statt ihn korrekterweise in einer Schleife aufzurufen.

Jedes Mal, wenn man z. B. die Bezeichnung der Sub ändern würde, müsste man im schlimmsten Fall alle anderen Vorkommnisse manuell ändern.

Natürlich gibt es auch Funktionen der Entwicklungsumgebung, Welche uns dabei helfen könnten, allerdings ist das ja nicht das Ziel des Ganzen.

VBA For Schleife selbst (zählergesteuert)

Kommen wir nun zur For–Schleife bezogen auf das Beispiel selbst, womit wir die obigen Probleme vermeiden. Auch wenn es hier vermutlich besser wäre eine „For Each“-Schleife zu verwenden.. Das Thema hier ist ja schließlich die For- also eine Zählergesteuerte Schleife!

Dim startHandKartenZahl As Integer
startHandKartenAnzahl = 7
Dim spielerNr As Integer
For spielerNr = 1 To 2
    KartenZiehen(7, spielerNr)
Next

Diese Schleifen-Art nennt man auch zählergesteuerte und kopfgesteuerte Schleife, denn Sie benutzt eine Zähler–Variable namens „spielerNr“.

Ebenso verwendet die Schleife die Bedingung zur Ausführung im Kopf, dass heißt, dass die Schleife nur ausgeführt wird, solange und nur wenn die Bedingung im Kopf „True“ ergibt.

VBA For Schleife (zählergesteuert) rückwärts

Besonders cool ist auch die Möglichkeit die Schleife mit wenig Aufwand einfach rückwärts laufen zu lassen. In diesem Fall würde also statt der Spieler 1, der Spieler 2 seine Karten zuerst bekommen.

Es kann ja nicht immer nur Mario an Platz 1 sein, sondern auch mal Luigi!

For spielerNr = 2 To 1 Step -1
    KartenZiehen(7, spielerNr)
Next

Ein weiteres VBA For Schleife Beispiel (objektgesteuert)

Ein weiteres nützliches Beispiel für eine VBA For Schleife wäre – ich nenne es mal – das objektgesteuerte Beispiel.

Statt wie oben mit einer Zähler-Variable zu arbeiten, verwendet man hierbei die tatsächlichen Objekte an sich als Iterationsmöglichkeit.

Eine einfache Erklärung könnte z. B. die gute alte Chipstüte bieten, klingt zwar komisch, ist aber so!

Ich glaube jeder stand schon mal, bzw. steht immer wieder vor dem „Problem“ nicht aufhören zu können.

Statt nach einer kleinen Portion bereits aufzuhören – was vermutlich auch dem ein oder anderen Fettpölsterchen gut täte – wird immer weiter gefuttert.

So könnte man auch bei einer „objektgesteuerten“ For Schleife verfahren, wörtlich gesprochen wie folgt:

• „Für“ jeden einzelnen Chip
• Nehme den Chip in die Hand
• Führe den Chip in den Mund (öffnen und schließen lasse ich jetzt mal weg..)
  
  ..Du merkst vermutlich worauf das hier hinausläuft.

Der letztendlich für das Dein Verständnis relevante Part ist hier das „Für jeden einzelnen Chip..“.

Alle Chips in der Tüte essen – yummy

Siehe Dir folgendes Beispiel einer VBA Schleife an, um zu verstehen wie ich obigen Pseudocode meine.

Beachte jedoch, dass ich hier die Deklarationen, bzw. Initialisierungen der Variablen erstmal weglasse..

Die „chips“-Auflistung kann z. B. auch durch den Aufruf, also als Rückgabewert einer Funktion zustande kommen.

For Each chip In chips
    Person.Essen(chip)
Next

Alle Strings eines Arrays durchlaufen

Ich denke, es ist noch einfacher, oder eher näher am Code, wenn Du das folgende Beispiel siehst:

' deklariere ein neues Array der Größe 3
Dim namen(0 To 2) As String

' befülle das Array mit Namen
namen(0) = "Robert"
namen(1) = "John"
namen(2) = "Debbie"

For Each name In namen
    ' mach irgendwas mit dem Namen
    ' in der Variable "name"
Next

Natürlich funktioniert diese Vorgehensweise auch mit anderen primitiven Datentypen wie z. B. Integern, oder Dates.

Der Beitrag VBA For Schleife erschien zuerst auf Robert Skibbe.

VBA MsgBox

Du hast vor eine VBA MsgBox in deiner „Excel VBA„-Anwendung anzuzeigen und möchtest deinem Nutzer darüber Informationen unterbreiten?

Dann freut es mich Dir alles Notwendige über die MsgBox-Funktion der Visual Basic for Applications Programmiersprache näher zu bringen.

Schaue doch später auch gerne mal bei meinen anderen Beiträgen vorbei: VBA Range, InStr, Array.

Hintergrund-Story – VBA MsgBox

Egal ob Dialogbox, Dialog, Dialogfenster, oder Dialogfeld, für gewöhnlich sind das alles Synonyme für ein und das Selbe.

Alle das Selbe meinend, bieten Messageboxen – Nachrichtendialoge – die Möglichkeit, Nutzern Informationen kontextuell aufbereitet darzustellen.

Neben der dadurch abgebildeten Informationen, ermöglicht es ein solcher Dialog gängigerweise eine Art Antwort durch den Nutzer an die Software.

Design & funktionale Möglichkeiten

Viele Wege führen nach Rom, ein Spruch, den fast jeder kennt, allerdings ist auch besonders in der Softwareentwicklung Wahrheit dahinter.

Vom allgemeinen „OK“-Dialog, bis komplexen Eingabemöglichkeiten in Form von diversen Inputs und Buttons.

Neben dem Fokus in diesem Beitrag auf die einfache MsgBox, kann sich auch wie so oft ein Blick nach links und rechts rentieren.

Sperren, oder nicht sperren?

Größtenteils sperren Dialoge den die übrige Anwendung, um die Aufmerksamkeit des Nutzers bei sich zu halten, man betitelt diese Dialog auch als modale Dialoge.

Es gibt jedoch vermutlich auch Aufgabengebiete, in denen es durchaus sinn macht, so genannte non-modale Dialoge zu verwenden, Welche die Anwendung nicht sperren.

Eine gängige Anwendungsmöglichkeit eine nicht-modalen Dialogs wäre eventuell die Eingabe eines Termins.

Designer & Tools

Durch das Folgen der Designer-Tools bestimmter Standards, sollen sich Nutzer möglichst schnell und intuitiv in den Oberflächen zurechtfinden.

Meistens befinden sich in der Mitte der Dialoge die Eingabefelder, Welche durch passende Beschriftungen gekennzeichnet sind.

Die Eingabefelder werden gängigerweise durch Designer-Toolkits zusammengestellt und optimal angeordnet.

Am unteren Ende des Dialogs befinden sich die primären Handlungen, darunter meist das Bestätigen, oder das Abbrechen des Dialoges.

Gängige Dialogfenster

Als Anwender kennt man meist schon viele Dialogfenster, hier siehst Du ein paar Beispiele:

• Informationsdialoge – Stellen Nachrichten und Knöpfe für die mögliche Antwort ans Programm dar.
• Eingabedialoge – Einfache Text-erfassende Dialogfenster.
• Datums-Dialoge – Fenster zur Auswahl eines Datums, oder auch kompletten Zeiträumen.
• Dateidialoge – Bieten die Option der Auswahl von Dateien, oder auch Verzeichnissen.
• Farbdialoge – Geben die Option zur Eingabe ein oder mehrerer Farben.

Code – VBA MsgBox

Schauen wir uns nun einmal konkrete Beispiele an:

Die Schreibweise alias Grammatik

Die übliche Schreibweise sieht wie hier drunter aus:

MsgBox <InhaltDesDialoges>, <KnöpfeUndIcons>, <TitelDesDialoges>

Schnelles, easy Beispiel

MsgBox "Die Nachricht des Dialoges", VBOKOnly, "Der Titel des Dialoges"

Dieses einfache Beispiel sieht als ausgeführtes Skript wie sofort folgend aus (Text geändert).

Du bekommst ein Dialogfenster mit dem gewählten Titel, dem angegebenen Inhalt und dem „OK“-Button dargestellt.

Die Schnell-Form

Die Schnell-Form mit Auslassen der optionalen Parameter wie z. B. die „Knöpfe“ und den „Titel“, sieht das Beispiel wie hier aus:

MsgBox "VBA MsgBox Nachricht hier :)"

Kombination der Konstanten

Hier nutzen wir nun einmal den „OR-Operator„, um die beiden Konstanten „vbYesNo“ & „vbQuestion“ zu verknüpfen.

Somit können mehrere Informationen auf einmal übergeben und der Dialog besser gestaltet werden.

MsgBox "Der Inhalt der Nachrichtenbox", vbYesNo OR vbQuestion, "Dialogtitel"

Die Antwort verarbeiten

Damit Du die erhaltene „Antwort“ des Dialoges verarbeiten kannst, kannst Du wie folgt vorgehen:

Dim x
x = MsgBox ("Der Inhalt der Nachrichtenbox", vbYesNo OR vbQuestion, "Dialogtitel")
If x = vbYes Then MsgBox "Der JA-Knopf wurde geklickt!"

In meiner kleinen Tabelle findest Du passende Button–Konstanten der VBA MsgBox.

Rückgabewerte der VBA MsgBox

Hier siehst Du eine Tabelle, Die die einzelnen Rückgabewerte der MsgBox zeigt.

Der Beitrag VBA MsgBox erschien zuerst auf Robert Skibbe.

VBA Range

Du möchtest mit der VBA Range und somit mit einen ganzen Bereich in Excel arbeiten?

Lerne in diesem Beitrag, wie Du mit der VBA Range Funktion ganze Bereiche erfassen und verarbeiten kannst.

Vielleicht interessieren Dich zu einem anderen Zeitpunkt noch folgende Beiträge: VBA InStr, Array, Array Length.

Was ist eine VBA Range

Eine Range in VBA, bzw. in Microsoft Excel, ist – übersetzt gesehen – eine Reichweite von mehreren Zellen einer Tabelle.

Wie Du Dir sicher vorstellen kannst, können wir so diverse Zeilen und Spalten abbilden und letztendlich durchlaufen.

Damit können wir unter anderem Summierungen, oder andere eigene Arbeitsschritte anwenden.

Die Qual der Wahl

Naja ganz so schlimm ist es nicht 😂, jedoch gibt es 2 tolle Auswahlmöglichkeiten für die Ranges.

Die erste Möglichkeit auf die VBA Ranges zuzugreifen ist es, den User ganz einfach wie bekannt seine eigene Auswahl treffen zu lassen und dann im Code auf die Auswahl zuzugreifen.

Bei der zweiten Möglichkeit handelt es sich mehr oder weniger um eine manuelle Methode, wo wir – wie aus Excel bekannt – die Ranges mit ich nenne es mal „Selektoren“ bestimmen.

Manuelle Auswahl des Nutzers – VBA Range

Stell Dir vor, der Nutzer deiner Anwendung markiert die Zellen z. B. wie folgt:

Er hat also praktisch die „Koordinaten“ A1, A2 und A3 in dieser Tabelle, bzw. diesem Tabellenblatt markiert.

Anders formuliert, könnte man diese „Range“ auch in „Excel-Sprache“ ausdrücken, was dann als „A1:A3“ bezeichnet werden würde.

Diese Range können wir im Grunde genauso in unserem VBA Skript verwenden, um die z. B. die Daten aus den respektiven Zellen abzurufen.

Auswahl via Code – VBA Range

Doch bevor wir mit dem tatsächlichen Abrufen von Werten, bzw. Iterieren von Zellen beginnen, werfen wir nochmal einen Blick auf die Auswahl der Range via Code.

Wie oben schon angesprochen verwenden wir dafür einen Ausdruck, Welchen ich als Selektor bezeichne und übergeben Diesen der Range-Funktion aus Excel.

Dim area
area = Range("A1:A3")

Im Code deklarieren wir dazu erstmal eine Variable namens „area“ und weisen Ihr anschließend den Rückgabewert der Range–Funktion zu.

Danach haben wir endlich die Möglichkeit, die einzelnen Zellen, Welche hier durch die Range widergespiegelt werden zu durchlaufen.

Zellen der Range durchlaufen

Um durch die einzelnen Zellen der Range zu iterieren nutzen wir im folgenden Beispiel die „For Each„-Schleife:

For Each cell in area
    ' do something
Next

Nun können wir innerhalb der einzelnen Schleifen-Durchläufe auf die jeweilige Zelle zugreifen.

Wir haben dadurch die Möglichkeit einerseits die hinter den Zellen steckenden Werte abgreifen und setzen, sowie die Formeln der Zellen verändern.

Werte der Zellen abrufen und verändern

Hier zeige ich Dir, wie Du einzelne Werte aus den Zellen abrufen und setzen kannst:

Werte abrufen

For Each cell in area
    Dim value = cell.Value
    ' so something with the value
Next

Werte setzen

For Each cell in area
    cell.Value = "The new Value!"
Next

Mit Formeln arbeiten

Im nächsten Abschnitt kümmern wir uns um das Setzen und Abrufen der Formeln.

Formel setzen

Wir haben die Möglichkeit die Formeln einer Range direkt zu setzen:

Range("A1:A3").Formula = "=Rand()"

Oder wie im obigen Beispiel mit Hilfe einer Schleife:

For Each cell in area
    cell.Formula = "=Rand()"
Next

Der Beitrag VBA Range erschien zuerst auf Robert Skibbe.

VBA InStr

Du möchtest die VBA InStr Funktion lernen und anwenden können und damit überprüfen, ob ein String innerhalb eines Anderen ist?

Dann freut es mich, Dir in diesem Beitrag die passende InStr-Funktion vorzustellen!

Eventuell hast Du zu einem späteren Zeitpunkt auch Interesse an einem der folgenden Beiträge: Excel VBA Array, InStr, Excel Range.

Tabellen-Arbeit – VBA InStr

Du bist in Excel VBA (Visual Basic for Applications) unterwegs und musst in einer Tabelle gewisse Prüfungen durchführen.

Durch einzelne Zellen navigierst Du, nimmst deren Wert entgegen und Du müsstest nun prüfen, ob sich dort ein gewisser Wert im String befindet?

Je nach deinem Ziel ist es mehr oder weniger von Wichtigkeit, an welcher genauen Position sich der String innerhalb des anderen Strings befindet.

Da wir in VBA die aus dem .NET bekannte Contains-Funktion, leider nicht verfügbar ist, müssen wir uns anders helfen.

Keine Panik, auch in VBA können wir uns wie fast immer mit gängigen Funktionen helfen, jedenfalls insofern Sie uns bekannt sind.

Strings durchforsten

Eine in VBA befindliche Funktion, Welche wir für unsere genannten Ziele verwenden können, ist die InStr-Funktion.

Die Funktion durchforstet die überlieferte Zeichenfolge und schaut, an Welcher Position Sie die Ziel–Zeichenfolge finden kann.

Falls Sie die Zeichenfolge des Begehrens nicht finden kann, gibt Diese als Rückgabewert eine Zahl 0 zurück.

Für den Vergleich selbst, haben wir die Option, den Vergleichs–Modus angeben zu können, wo wir letztendlich aus 4 Werten auswählen können.

Die VBA InStr Funktionalität

Bevor wir tiefer ins Geschehen huschen, schauen wir uns wie fast immer vorher einmal die Aufrufmöglichkeiten der Funktion an.

Parameterliste

[Optional] start [Integer]

Der start-Parameter spezifiziert die Position, ab der die Suche gestartet wird.

Da der Parameter als optional gekennzeichnet ist, wird bei Nicht-Angabe die Suche automatisch ab Anfang gestartet.

string1 [String]

Dieser String, ist sozusagen das Subjekt, also das „Ding“, worin gesucht wird.

string2 [String]

Hierbei handelt es sich sozusagen um die Nadel, die im Heuhaufen – oder Subjekt – gesucht werden soll.

[Optional] compare [Integer]

Mit diesem Parameter haben wir die Möglichkeit 1 der folgenden Vergleichs-Methoden zu konfigurieren:

Wenn man diesen Parameter überspringt, wird die binäre Vergleichs-Methode verwendet.

Ich denke die für uns relevanten Vergleichs-Arten sind: vbBinaryCompare & vbTextCompare.

Der binäre Vergleich, also die vbBinaryCompare Option gibt an, dass die Zeichen exakt übereinstimmen müssen.

Die Option vbTextCompare hingegen nutzt den textbasierten Vergleich, dabei spielen Groß– und Kleinschreibung keine Rolle.

Code – VBA InStr

In diesem Abschnitt schauen wir uns Beispiele an:

Dim text
text = "Excel is a great tool!"
Dim needle
needle = "great"
Dim result
result = InStr(1, text, needle)
MsgBox(result)

Zuerst deklarieren wir eine Variable „text“ und weisen ihr danach den Wert „Excel is a great tool!“ zu, dies bildet unseren zu durchsuchenden Text.

Danach kommt ein weiterer String namens „needle“ hinzu, Welche im wahrsten Sinne des Wortes unsere Nadel im Heuhaufen darstellt.

Danach speichern wir das Ergebnis unserer Suche in der „result“-Variable zwischen und geben Dieses aus!

Wenn Du das Beispiel ausführst, bekommst Du den Wert „12“ angezeigt, da sich unser gesuchtes Wort „great“ an der 12 Position im String befindet.

Der Beitrag VBA InStr erschien zuerst auf Robert Skibbe.

Excel VB Array

Du möchtest mit dem Excel VB Array arbeiten und lernen, bzw. verstehen wie das Array funktioniert?

Dann lege jetzt in meinem heutigen Beitrag los und wende das Array anschließend erfolgreich in Excel VB an!

Vielleicht hast Du auch noch an anderen Beiträgen Interesse: Email senden, Tastendruck simulieren, Select Case.

Dieser Weg.. zum Array

Ein Array ist erstmals vielleicht nicht der vorherrschende Sinnesgedanke, wenn man tatsächlich das erste Mal auf Diese stolpert.

Ich denke, dass es einfach nur eine Weiterentwicklung aus Not heraus ist, weil man an die Grenzen der bisherigen Werkzeuge gestoßen ist.

Sobald man versteht, dass Variablen nur einen Wert speichern können, wird man durch Suchen wie: „Mehrere Strings zwischenspeichern“, „Integer durchlaufen“, etc. irgendwann auf Arrays stoßen.

Multiple Zahlenwerte speichern – Excel VB Array

Stellen wir uns an dieser Stelle mal eine gute alte Lottospiel Runde vor.

Ich empfinde es so für unser Beispiel wesentlich einfacher, da man sich so etwas Konkretes vorstellen und damit besser arbeiten kann.

Bei unserem kleinen Lotto-Versuch dachte ich an das einfache „Super 6„-Spiel, wo wir den Nutzer 6 Zahlen zwischen 1 und 9 aussuchen lassen.

Karte ziehen

Bevor wir mit unserer kleinen Partie beginnen können, müssen wir überlegen, wie der Nutzer eine Zahl wählen kann und wie wir Diese dann in ein Array bekommen.

Ich denke hier würde sich eine InputBox mit „Ja/Nein“ durchaus anbieten, daher verwenden wir Diese.

Dim number
number = InputBox("Enter your number please!")

Da wir nun eine Zahl der 6 Zahlen für unser Lotto erhalten haben, wäre vermutlich der nächste Gedanke, wie man die Nummer nun in ein Array speichert.

6 Zahlen, ein Array – Excel VB Array

Im obigen, Beispiel konntest Du sehen, wie Du eine Zahl für unser Lottospiel in eine Variable legen kannst.

Eine Variable ist im ersten Sinne dazu da, einen Wert zu speichern, mehr kann Sie auch nicht aufnehmen.

Auch wenn Dieser Wert z. B. ein Objekt einer eigenen Klasse ist passt in eine Variable nur Eines davon.

Oft hat man als Neuling ein Problem, wenn man das erste Mal statt eines Datenelements, Mehrere zwischenspeichern soll.

Für gewöhnlich hat man am Anfang seine Probleme damit, mehrere Daten speichern zu müssen, oder zu wollen.

Nun ist der beste Zeitpunkt die Excel VB Arrays ins – im wahrsten Sinne des Wortes – Spiel kommen zu lassen.

So nicht!

Beim Arbeiten mit Quellcode und den dort auftretenden Problemen kommt man immer wieder zur Recherche nach diversen Themen.

Aller Probleme nach gibt es auch sehr viele nicht so prickelnde Beispiele, ich denke das Folgende dürfte für unser Beispiel passen:

Dim number1 As Integer
Dim number2 As Integer
Dim number3 As Integer
Dim number4 As Integer
Dim number5 As Integer
Dim number6 As Integer

Sehr oft habe ich diese blöde Variante bei den verschiedensten „Programmierern“ im Quellcode gefunden, natürlich speziell bei Grünschnäbeln #nooffense!

Auch wenn man diese Herangehensweise natürlich häufiger bei noch nicht so erfahrenen Entwicklern sieht, habe ich es auch schon bei Fortgeschrittenen gesehen.

Dieser Stil wird häufig wegen der augenscheinlichen Einfachheit, statt passender Datentypen verwendet.

Ich denke das hauptsächliche Problem wird Dir bewusst, wenn ich Dich bitten würde, die Variablen zu durchlaufen, denn so ist das schwierig.

Warum ein Etui statt eines Kartons? – Excel VB Array

Wieso sollte man eine Lottokugel in ein einzelnes Etui stecken, wenn alle Kugeln direkt in einem kleinen Karton gemeinsam untergebracht werden könnten?

Der Karton dient hier als Analogie zum Excel VB Array, wo man eben mehrere Elemente hineinspeichern kann.

Als nächstes zeige ich, wie Du ein Array deklarieren, bzw. initialisieren und danach verwenden könntest.

Zahlen in Array speichern – Excel VB Array

Hier zeige ich Dir, wie das Array erstellst und danach mit den Lottozahlen bestücken kannst.

Denke immer daran, dass die Arrays in der Programmierung generell bei 0 zu zählen anfangen.

Deklaration

Ohne Fassungsvermögen

Dim numbers()

Mit Fassungsvermögen

Hier ist ein Beispiel einer Deklaration mit festgelegtem Fassungsvermögen:

Dim numbers(3)

Initialisierung

Neben den hier drüber gezeigten Deklarationen, kannst Du mit den folgenden Zeilen ein Array initialisieren, sprich direkt mit Werten bestücken.

Dim numbers
numbers= Array(3, 7, 4)

Direkter Zugriff auf Elemente

Hier greifen wir händisch, bzw. manuell auf das jeweilige Element zu, indem wir den Index direkt angeben:

Dim numbers(2)
numbers(0) = 5
numbers(1) = 9
numbers(2) = 3

Jede Zahl mit Schleife durchlaufen

Nun gehen wir jeden einzelnen Index unseres Excel VB Array mit einer Schleife durch und können die einzelnen Werte setzen:

For i = LBound(numbers) To UBound(numbers)
    numbers(i) = ' a value!
Next

Zahlen nachträglich hinzufügen – Excel VB Array

Auch wenn wir in unserem „Super 6“-Lottospiel die genaue Anzahl an Zahlen kennen, muss man vermutlich irgendwann weitere Elemente hinzufügen.

Dazu können wir das ReDim-Statement zusammen mit dem Preserve-Schlüsselwort nutzen.

Damit wir die Größe des Arrays zu neu festegelegt und die bisherigen Daten darin erhalten.

Dim numbers
numbers = Array(3, 5)
ReDim Preserve numbers(2)
numbers(2) = 7

Nach Ausführung befinden sich die Zahlen 3, 5 und 7 im Array.

Das Lottobeispiel selbst

In diesem Abschnitt fragen wir den Nutzer einfach nach 6 Zahlen und sammeln Diese im Excel VB Array.

Dim numbers
numbers = Array()
Dim number
Dim newBounds
For i = 1 To 6
    newBounds = UBound(numbers) + 1
    ReDim Preserve numbers(newBounds)
    number = CInt(InputBox("Please provide number " & i))
    numbers(newBounds) = number
Next

Danach könnte man noch hingehen und eine Überprüfung einbauen, ob der Nutzer die Zahlen tatsächlich erraten hat, aber das überlasse ich dann Dir 😉!

Der Beitrag Excel VB Array erschien zuerst auf Robert Skibbe.