Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
556to560
556to560
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Abfrage wie SQL in Excel VBA???

Forumthread: Abfrage wie SQL in Excel VBA?

Abfrage wie SQL in Excel VBA?
02.02.2005 15:05:04
littlemungo
Hallo,
ich habe eine riesige Tabelle, aus der ich ähnlich wie mit SQL bestimmte Datensätze selektieren möchte und die Werte einer Spalte aus jedem selektierten danach addieren.
In SQL wüßte ich, wie das zu machen ist, in Exycel VBA aber leider nicht. Kann mir jemand helfen?
Zur besseren Verständlichkeit:
Spalte A: Bundesland
Spalte B: Geschlecht
Spalte C: Alter
Spalte D: Anzahl
Ich möchte nun zB alle Männer aus Hessen, die 33 Jahre alt sind, selektieren und die ANzahl zurückgeben. In SQL würde das in etwa heißen:
SELECT COUNT Anzahl FROM Tabelle WHERE Bundesland="Hessen" AND "Geschlecht="M" AND Alter="33".
Wie mache ich das in Excel VBA?
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Abfrage wie SQL in Excel VBA?
Dr.
Dann machs doch in Access!
AW: Abfrage wie SQL in Excel VBA?
littlemungo
wär ja naheliegend... wenn access vorhanden wäre... MUSS in excel sein....
AW: Abfrage wie SQL in Excel VBA?
Dr.
Hm, und dann genügt Dir der Autofilter nicht?
Anzeige
AW: Abfrage wie SQL in Excel VBA?
02.02.2005 16:19:44
littlemungo
nein, der genügt leider nicht. Erstens ist diese Abfrage in ein VBA Projekt eingebettet, und zweitens muß ich Mehrfachauswahl in einer Spalte vorsehen (bspw. in einem Feld "Bundesland" alle Leute aus Hessen und Rheinland-Pfalz.....)
AW: Abfrage wie SQL in Excel VBA?
02.02.2005 16:18:55
Russi
HI!
Auch Excel bietet SQL in Form einer Datenabfrage über MS Query.
Erstelle eine neue Datei, gehe im Excel Menü auf DATEN, externe Daten, neue Abfrage erstellen, Datenquelle: xls-Datei.
Viele Grüße
Russi
www.Russi.de.tt
Anzeige
;

Forumthreads zu verwandten Themen

Automatische SQL Abfragen über VBA
Marco

Hallo alle zusammen,
ich versuche über ein Makro automatisch auf eine Datenbank mit SQL zuzugreifen. Ich habe mit den Makrorecorder eine Abfrage aufgenommen. Der SQL Text lässt sich darin schnell finden. Nur stehen dort natürlich eingegebene feste Datums drin. Ich möchte aber das Datum vari...
17.09.2008 10:05:00
Thread-ID: 1010252
8 Beiträge
multiple Access SQL Query INSERT
hackelberg

Hallo,
ich habe ein kleines Problem. Ich füttere eine Access Datenbank per Excel VBA mit INSERT Daten.
Nach so 80-90 Datensätzen kommt eine Unterbrechung im Excel VBA code und er fragt die Quelltabelle an.
Wenn ich Debugge und weiter mache nimmt er problemlos die nächsten 80-90 Sät...
31.05.2009 19:59:56
Thread-ID: 1078419
7 Beiträge
SQL in VBA
tor

Hallo,
wie kann ich folgenden SQL Code in VBA einfügen, damit ich "VERPACK_10.A_KDNR Like 79572" variabel halten kann und eventuell per Userform abfragen kann?
SELECT date(concat(concat(concat(TTX,'.'),concat(MMX,'.')),JJJJX)), '', VERPACK_10.E_NAME,
VERPACK_10.E_STR2,
'le...
10.02.2011 08:33:45
Thread-ID: 1199923
2 Beiträge
Anzeige
SQL in VBA verwenden
Stefan

Hallo zusammen,
hat jmd ein Beispiel, um folgende SQL-Query in VBA auszuführen?
SELECT SUM( `Rohdaten$`.Geld)
FROM `Rohdaten$` `Rohdaten$`
WHERE (`Rohdaten$`.Datensatzart='1') AND (`Rohdaten$`.Wert='1')
Danke Euch.
18.10.2011 11:15:15
Thread-ID: 1234303
2 Beiträge
Excel VBA MySQL-Datenbank anzeigen
Detlef

Hallo,
ich bin am verzweifeln und brauche dringend Hilfe.
Warum bekomme ich immer einen Laufzeitfehler:
'-2147467259 (80004005)' [mysql][odbc 3.51 driver] access denied for user
Private Sub mysql_show() Dim Cn As New ADODB.Connection Dim Server As String Dim database As String...
17.11.2012 13:11:49
Thread-ID: 1287069
2 Beiträge
Anzeige
sql statement in vba
robert_1

Hi an alle,
ich möchte gerne Daten aus Excel in eine Datenbank schreiben; dabei sollen die zu kopierenden Werte in einen bestehenden Record gespeichert werden, nämlich dort, wo die ID übereinstimmt.
Die Tabelle sieht hat die Spalten:
ID, Text1
In Excel steht in Zelle 1,1 eine ID...
21.12.2012 10:29:59
Thread-ID: 1291781
10 Beiträge
Daten per VBA von Datenbank abfragen
Datenbank

Hallo zusammen,
ich möchte gerne aus der Tabelle TEST die Spalten A und B abfragen und direkt in Excel eintragen. Hierzu habe ich in Excel den Bereich entsprechend über den Namensmanager definiert ( Spalte A und Spalte B).
Allerdings wird jetzt in dem angegeben Bereich der erste abgefra...
07.05.2014 15:42:16
Thread-ID: 1360320
2 Beiträge
Anzeige
SQL in VBA
Dreadlord95

Hallo,
ich habe folgendes Problem: Ich möchte gerne eine SQL Abfrage in VBA starten, welche dann die Werte in bestimmte Zellen schreibt. Mein Code sieht bisher wie folgt aus:
Sub Oracle() Dim conn, rs Dim strSQL As String Set conn = CreateObject("ADODB.Connection") With conn .Connection...
28.01.2015 09:26:18
Thread-ID: 1405560
7 Beiträge
SQL Abfrage in VBA
Feliks

Liebes Forum,
ich hoffe ihr könnt mir weiterhelfen, denn ich bin betriebsblind geworden:
Ich bekomme zur Laufzeit bei dieser SQL Abfrage in VBA den Fehler:
-Syntaxfehler in FROM Klausel: Vielleicht sieht jemand diesen....
Set Signal = cnn.Execute("SELECT Cdb_AttributeRel_Value.N...
27.10.2015 13:56:54
Thread-ID: 1454726
2 Beiträge
SQL-Abfrage über Excel mit zusätzlichen VBA-Funkti
André

Hallo,
Wahrscheinlich für die meisten eine einfache Frage. Ich arbeite noch nicht so lange mit SQL und VBA. Aber hier erstmal meine Frage.
Ich habe über VBA eine SQL-Abfrage generiert die mir eine bestimmte Tabelle mit den geforderten Kriterien anzeigt. Soweit funktioniert alles sehr gu...
11.03.2017 22:29:44
Thread-ID: 1546846
2 Beiträge
SQL in VBA
Eric

Hallo Community,
Thema ist eine ADO Abfrage per SQL String mit dem Ziel, eine Datei in strPath mittels Volltextsuche nach dem Suchbegriff strSearch zu durchsuchen.
Es geht nur um folgende Zeile im Code:
strSQL = "SELECT System.ItemPathDisplay FROM SYSTEMINDEX WHERE CONTAINS(*," &...
22.04.2018 09:52:47
Thread-ID: 1620828
2 Beiträge
SQL-Abfrage in VBA
Matthias

Hallo zusammen,
Ich habe folgenden SQL-Code, welchen ich gerne in VBA einfügen würde. Leider bekomme ich es nicht zum laufen. Hat jemand eine Idee, woran es liegen könnte?
Der Code funktioniert einwandfrei in SQL.
Vielen Dank im vorraus! DECLARE @year AS VARCHAR(4) SET @year = da...
05.02.2019 16:04:00
Thread-ID: 1673517
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

SQL-ähnliche Abfragen in Excel VBA durchführen

Schritt-für-Schritt-Anleitung

Um eine SQL-Abfrage in Excel VBA durchzuführen, kannst du die folgenden Schritte befolgen:

  1. Öffne den VBA-Editor:

    • Drücke ALT + F11, um den Visual Basic for Applications (VBA) Editor zu öffnen.

  2. Erstelle ein neues Modul:

    • Klicke mit der rechten Maustaste im Projektfenster und wähle "Modul einfügen".

  3. Definiere die Variablen:

    • Lege die Variablen für die Daten fest, die du abfragen möchtest. Beispiel:
    Dim ws As Worksheet
Dim r As Range
Dim countAnzahl As Long

  4. Setze das Arbeitsblatt:

    • Weise das Arbeitsblatt zu, auf dem sich deine Daten befinden:
    Set ws = ThisWorkbook.Sheets("Tabelle1")

  5. Führe die SQL-Abfrage durch:

    • Verwende eine Schleife, um die gewünschten Datensätze zu selektieren und die Anzahl zu addieren. Beispielcode:
    countAnzahl = 0
For Each r In ws.Range("A2:A" & ws.Cells(ws.Rows.Count, "A").End(xlUp).Row)
   If r.Value = "Hessen" And r.Offset(0, 1).Value = "M" And r.Offset(0, 2).Value = 33 Then
       countAnzahl = countAnzahl + r.Offset(0, 3).Value
   End If
Next r
MsgBox "Die Anzahl beträgt: " & countAnzahl

  6. Führe das Skript aus:

    • Drücke F5, um den Code auszuführen und die Anzahl anzuzeigen.

Häufige Fehler und Lösungen

  • Fehler: "Typen inkompatibel"

    • Lösung: Stelle sicher, dass die Datentypen übereinstimmen (z.B. Zahl vs. Text). Verwende CStr() oder CInt() zur Typkonvertierung.

  • Fehler: "Objekt nicht gefunden"

    • Lösung: Überprüfe den Namen des Arbeitsblatts und die Zellreferenzen.

Alternative Methoden

Wenn du nicht mit VBA arbeiten möchtest, gibt es auch die Möglichkeit, Excel-Abfragen über MS Query durchzuführen:

  1. Gehe zu Daten > Externe Daten > Neue Abfrage erstellen.
  2. Wähle die Datenquelle (z. B. eine Excel-Datei) aus.
  3. Erstelle deine SQL-Abfrage direkt im Abfrage-Editor.

Diese Methode ist besonders nützlich, um schnell SQL-Abfragen in Excel zu erstellen, ohne den VBA-Code zu schreiben.

Praktische Beispiele

Hier sind einige Beispiele zur Verwendung von SQL in Excel VBA:

  • Um die Anzahl der Frauen aus Rheinland-Pfalz zu zählen:

    If r.Value = "Rheinland-Pfalz" And r.Offset(0, 1).Value = "W" Then
   countAnzahl = countAnzahl + r.Offset(0, 3).Value
End If

  • Um die Gesamtanzahl aller Personen in Hessen zu addieren:

    If r.Value = "Hessen" Then
   countAnzahl = countAnzahl + r.Offset(0, 3).Value
End If

Tipps für Profis

  • Nutze Fehlerbehandlungsroutinen in deinem Code, um unerwartete Fehler abzufangen.
  • Vermeide Hardcoding von Werten, indem du Variablen verwendest, um die Wartbarkeit deines Codes zu verbessern.
  • Experimentiere mit SQL-Queries in VBA, um komplexere Abfragen zu erstellen, wie z.B. JOIN-Operationen.

FAQ: Häufige Fragen

1. Kann ich SQL-Abfragen direkt in Excel verwenden?
Ja, du kannst SQL-Abfragen über MS Query oder mit VBA durchführen.

2. Welche Excel-Version benötige ich für SQL-Abfragen in VBA?
Die meisten modernen Excel-Versionen (2010 und höher) unterstützen SQL-Abfragen in VBA.

3. Funktioniert die SQL-Abfrage auch mit Access-Datenbanken?
Ja, du kannst auch Access VBA SQL-Abfragen ausführen, indem du eine Verbindung zur Access-Datenbank herstellst.

4. Wie kann ich mehrere Bedingungen in einer SQL-Abfrage kombinieren?
Du kannst mehrere If-Bedingungen in deinem VBA-Code verwenden, um die gewünschten Datensätze zu filtern.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige