Thema: Ermittlung von Datenbank- und Array-Formelergebnissen per VBA

Home

Gruppe

Funktion

Problem

Über VBA sollen sowohl die Ergebnisse von Datenbank- wie auch Array-Formeln ermittelt und ausgegeben werden.

Lösung

Den nachstehenden Code in ein Standardmodul eingeben, einer Schaltfläche zuweisen und starten.

StandardModule: Modul1

Sub DSumInVBA()
   Dim rngDataBase As Range
   Dim rngCriteria As Range
   Range("E3").Formula = "=dsum(a:b,""Wert"",c1:d2)"
   MsgBox Range("E3").Value
   Range("E3").ClearContents
End Sub

Sub DSumInArray()
   Range("J3").FormulaArray = _
      "=sum((a2:a100" & _
         Range("F2").Value & _
         CStr(CDbl(Range("G2").Value)) & _
         ")*(b2:b100" & Range("H2").Value & _
         Range("I2").Value & ")*b2:b100)"
   MsgBox Range("J3").Value
   Range("J3").ClearContents
End Sub

Beiträge aus dem Excel-Forum zu den Themen Funktion und Vba

Copy funktioniert nur einmal	Diagramm mit vba erstellen
Schreibschutz prüfen funktioniert nicht	VBA - Wochentage, zählenwenn
Vba: refersToR1C1 Namen erzeugen	mehrere Wörter suchen VBA
Vba: Array dynamisch dimensionieren und einfügen	mit VBA Farbe von CB´s steuern
Diagramme in PowerPoint mit VBA neu befüllen	PDF Drucken VBA
Split-Funktion beim Einlesen TXT-Datei	VBA Verweise
Match Funktion spinnt (?)	VBA - Eingabefeld für gesamte Spalte
AutoFilter per VBA	SVerweis funktioniert nicht
PasteSpecial funktioniert nicht.	Telefonnummer automatisch per VBA formatieren
Mögliche Reihenfolgen per VBA in Tabelle eintragen	Excel VBA Code Hilfe
Verfügbarkeitsprüfung VBA-Tool	Bedingte Formatierung per VBA mit Schleife
Matrix in VBA	Excel to Word Kapitel VBA
VBA: UF Application.Match	Kartendiagramm per VBA erstellen und formatieren
Generierung von Tabs per VBA + Sammeldruck	'Run' & 'IWshShell3' Fehlermeldung VBA
VBA Statt Windows soll Mac	Produktnummer auslesen VBA
Excel for Office 365 VBA Problem	"Speichern unter" mit VBA für eigene Files
VBA: UF Laufzeitfehler	VBA Code um einzelne Zellen zu sperren
VBA Mailanhang per Filter	VBA- aus anderer Mappe kopieren)mit Kriterium)
VBA-Code funktioniert nicht mit anderem Office	VBA E-Mail mit Button und Bedingungen
VERKETTEN in VBA ohne Anführungszeichen	Hilfe bei der INDEX Funktion
VBA - Erstellung eines Dokumentengenerator	HTML in VBA bei Outlook EINLADUNG
AW: VBA Lösung gesucht	Outlook Einladung Absender anderes Konto Excel VBA
Workbook: Start ausgeblendet ohne VBA	VBA: Dynamisches Diagramm mit bestimmten Zellberei
VBA - Listbox in Abhängigkeit füllen	Öffnen einer weiteren Excel-File mit VBA
VBA- Einträge bis zur letzten Zeile