Suchergebnisse für Anfrage "vba"
VBA Listet alle Dateien (auf schnelle Weise) in Unterordnern ohne FileSystemObject @ au
Ich suche nach einer Möglichkeit, alle Dateien aus Unterordnern eines Ordners schnell aufzulisten. Der auf FileSystemObject basierende Ansatz ist zu langsam - es dauert ca. 6 Minuten, um 416 Dateinamen von einem Netzlaufwerk ...
Warum verarbeitet diese for-Schleife nicht den gesamten Datensatz?
Hintergrun Ich habe eine Tabelle mit Ticketzuordnungen für eine Veranstaltung. In jeder Zeile der Tabelle sind ein Name und die Anzahl der zugewiesenen Tickets angegeben. The ...
VBA QueryPerformanceCounter funktioniert nicht
Ich versuche, die Ausführungszeitunterschiede zwischen Datentypen zu testen, nachdem 1 Million Zufallszahlen pro Datentyp (Ganzzahl, Doppel, Dezimal und Variante) durchlaufen wurden. Ich habe diesen Code von der Microsoft Developer-Website ...
Kann die MATCH-Funktion in einer Array-Formel mehrere Übereinstimmungen zurückgeben?
Ich habe versucht, das @ zu verwendMATCH -Funktion in einer Matrixformel, um mehrere Übereinstimmungen zurückzugeben (standardmäßig wird nur die erste Übereinstimmung zurückgegeben). Dies scheint jedoch nicht zu funktionieren. Wie kann ich ...
Leere Zellen füllen (Variation)
Ich habe ein Problem mit dem Füllen von leeren Zellen einer Spalte. Ich habe 3 Spaltenüberschriften in A, B, C. Unter dem ich variable Mengen von Zeilen habe, aber Spalte A und B werden immer Daten haben. Spalte C könnte Lücken haben. Wie ...
vba Ausgabe 2D ein Array auf Blatt Ausgabe
Ich versuche, das folgende 2D-Array auf einem Blatt in einer Arbeitsmappe auszugeben. Der Code wird ausgeführt, aber das Array ist auf dem Blatt nicht sichtbar. Bitte helfen Sie mir, den Fehler zu finden. Vielen Dan Dim R As Long, C As Long, ...
VBA: speichere eine Datei mit UTF-8 ohne BOM
es ist wahrscheinlich sthg einfach, hier ist was ich ausprobiert habe: Set objStream = CreateObject("ADODB.Stream") Set objStreamNoBOM = CreateObject("ADODB.Stream") With objStream .Open .Charset = "UTF-8" .WriteText "aaaaaa" .Position = 0 End ...
Spaltenzellen für jede Spaltenzelle erweitern
Ich habe 3 verschiedene Datensätze (in verschiedenen Spalten) Tiere (5 verschiedene Arten) in Spalte A Früchte (1000 verschiedene Arten) in Spalte BLänder (10 verschiedene Arten) in Spalte CMit diesen 3 Datensammlungen möchte ich 5 × 1000 × 10 ...
Optimieren des Excel-Pivot-Tabellenfilters mit Array VBA
Ich habe ein Benutzerformular, in dem ein Benutzer alle Elemente überprüft, nach denen eine Gruppe von Pivot-Tabellen gefiltert werden soll. Das Problem ist, dass ich ungefähr 40 Pivot-Tabellen und über 250 Optionen habe, nach denen der Benutzer ...
VBA Integer Overflow bei 70.000
Ich habe ein Arbeitsblatt mit 70.000 Datenzeilen und ein einfaches Makro, das die Gesamtzahl der Zeilen zählt: Dim LastRow as Integer LastRow = SourceSheet.Cells.Find(what:="*", searchdirection:=xlPrevious, searchorder:=xlByRows).Row MsgBox ...