Ja, in VBA für Excel gibt es die Möglichkeit, eine Bedingung mit **If Not (Bedingung) Then** zu prüfen. Das Schlüsselwort **Not** kehrt die Bedingung um. Hier ein Beispiel: ```vba... [mehr]
Um in Excel VBA eine Datenbank zu filtern und die gefilterten Daten von Spalte A bis K zu drucken, kannst du den folgenden Code verwenden. Dieser Code filtert die Daten in den Zellen A1 bis L139 basierend auf den Kriterien in Spalte L und druckt dann die gefilterten Daten. ```vba Sub FilterAndPrint() Dim ws As Worksheet Dim rng As Range Dim criteria1 As String Dim criteria2 As String ' Arbeitsblatt festlegen Set ws = ThisWorkbook.Sheets("DeinBlattName") ' Ersetze "DeinBlattName" mit dem tatsächlichen Namen des Arbeitsblatts ' Bereich festlegen Set rng = ws.Range("A1:L139") ' Suchkriterien festlegen criteria1 = "Suchkriterium1" ' Ersetze mit deinem ersten Suchkriterium criteria2 = "Suchkriterium2" ' Ersetze mit deinem zweiten Suchkriterium ' Autofilter anwenden rng.AutoFilter Field:=12, Criteria1:=criteria1, Operator:=xlOr, Criteria2:=criteria2 ' Spalte L ist die 12. Spalte ' Drucken der gefilterten Daten ws.PrintOut From:=1, To:=1, Copies:=1, Collate:=True ' Autofilter zurücksetzen rng.AutoFilter End Sub ``` ### Hinweise: 1. Ersetze `"DeinBlattName"` mit dem tatsächlichen Namen deines Arbeitsblatts. 2. Setze `Suchkriterium1` und `Suchkriterium2` durch die tatsächlichen Suchkriterien, die du verwenden möchtest. 3. Der Code filtert die Daten in Spalte L und druckt die gefilterten Daten von Spalte A bis K. Um den Code auszuführen, öffne den VBA-Editor (Alt + F11), füge ein neues Modul hinzu und kopiere den Code dort hinein. Danach kannst du das Makro ausführen.
Ja, in VBA für Excel gibt es die Möglichkeit, eine Bedingung mit **If Not (Bedingung) Then** zu prüfen. Das Schlüsselwort **Not** kehrt die Bedingung um. Hier ein Beispiel: ```vba... [mehr]
Die Syntax `Range(Cells(a,10):Cells(b,10)).Copy` ist in VBA (Visual Basic for Applications) **nicht korrekt**. In VBA muss der Bereich innerhalb der `Range`-Funktion als String oder als zwei separate... [mehr]
Um in Excel mit VBA einen Bereich namens "test" aus Blatt 1 zu kopieren und in Blatt 2 ab Zelle B18 einzufügen, kannst du folgenden VBA-Code verwenden: ```vba Sub BereichKopieren()... [mehr]
Um Zahlen wie 6,9999999999 in Excel-VBA beim Schreiben in eine .txt-Datei **nicht** im wissenschaftlichen Format (z. B. 6,9999999999E+00), sondern exakt so wie sie sind (mit allen Nachkommastellen), z... [mehr]
Um in Excel VBA ein bestimmtes Tabellenblatt zu aktivieren, verwendest du folgende Syntax: ```vba Worksheets("Tabellenblattname").Activate ``` Ersetze dabei `"Tabellenblattname"`... [mehr]
Um eine Excel-Datei, die per Access-VBA geöffnet wurde, automatisch wieder zu schließen, solltest du das Excel-Objektmodell in deinem Access-VBA-Code verwenden. Hier ein Beispiel, wie das g... [mehr]
Der Befehl `QuellBlatt1.Rows(2).Copy` in VBA (Visual Basic for Applications) bedeutet, dass die **zweite Zeile** (Row 2) des Arbeitsblatts mit dem Namen oder Objektverweis `QuellBlatt1` **kopiert** wi... [mehr]
In Excel VBA kannst du den Typ eines Tabellenblatts (ob es sich um ein Arbeitsblatt oder ein Diagrammblatt handelt) mit der Type-Eigenschaft des jeweiligen Objekts ermitteln. Hier ein Beispiel: ```vb... [mehr]
Um in Excel mit einem VBA-Makro die Zeilen 8 bis 10 auszublenden, kannst du folgenden Code verwenden: ```vba Rows("8:10").Hidden = True ``` So gehst du vor: 1. Drücke `ALT + F11`, um... [mehr]
So sieht das in VBA aus: ```vba Sub Makro1() Call Makro2(5) End Sub Sub Makro2(ByVal Wert As Integer) MsgBox "Der übergebene Wert ist: " & Wert End Sub ``` **Erkläru... [mehr]