Articles of vba

Arbeitsmappe von Outlook ohne schreibgeschützten Modus öffnen

Ich versuche, eine Excel-Arbeitsmappe zu öffnen und ein Makro von Outlook auszuführen. Leider scheint es immer, wenn ich die Arbeitsmappe öffne, in den schreibgeschützten Modus zu wechseln, was bedeutet, dass ich das gewünschte Makro nicht ausführen kann. Hier ist mein Code: Sub runPat(client As String) 'Runs a PAT using tool with client as input Dim […]

Der Vlookup-Bereich nach Namensänderung in VBA kann nicht aufgerufen werden

Entschuldigung, wenn das anders gefragt wurde, aber ich konnte dieses Problem nirgends finden … Ich erstelle ein model zur Analyse der Testdaten und muss die Größe meiner benannten Bereiche regelmäßig variieren, um der unterschiedlichen Anzahl von Lernenden auf jedem Kurs Rechnung zu tragen. Ich habe den folgenden Code verwendet, um dies zu tun: For i […]

Die Verwendung von @@ IDENTITY in VBA Excel funktioniert nicht

Ich habe einige Probleme mit der Ausführung eines SQL, um mir die ID-Nummer zu bekommen. Ich habe mehrere Lösungen in diesem Forum ausprobiert, aber es scheint nicht zu funktionieren. Ich hoffe, dass jemand helfen kann. Sub Add_buy_order() Dim oConn As ADODB.connection Dim oRs As ADODB.Recordset Dim sConn As String Dim sSQL As String Dim StrDBPath […]

Excel vba Auswahl einer Option aus der IE-Webseiten-Combobox (Fehler)

Ich versuche, das Formular dieser Webseite auszufüllen "[ https://login.yahoo.com/account/create?src=fpctx&intl=us&lang=en-US&done=https%3A%2F%2Fwww.yahoo.com&specId=yidReg ] [1] "mit Hilfe von Excel VBA. Alles funktioniert gut, außer dass ich keine Option aus der Combobox auswähle, wo ich "Ländercode" wählen muss. ID der Combobox = "country-code-lbl-aria" Ich habe diesen Code ausprobiert: Code: Sub iepart2() Dim ie As Object ' Set ie = CreateObject("internetexplorer.application") […]

Einfügen von Text aus einer Excel-file in ein Word-Dokument (Word VBA)

Da meine Dokumente in der Regel bestimmte Sätze haben, die immer wieder verwendet werden können, möchte ich sie alle HotKey, um time zu sparen. Um genauer zu sein, plane ich, sagen wir, Macro1 (insert "natürlich"), Macro2 (insert "Das Problem ist"), und Macro3 (insert "von der time"), Hotkeyed zu Alt +1,2 , 3 jeweils. Wenn ich […]

EXCEL – US- und EU-Nummernformat in einem Blatt

Ich habe eine Excel-Tabelle und es gibt zwei Tabellen in einem Blatt. Ich brauche eine Tabelle, die als EU (Dezimaltrennzeichen "," und Tausendertrennzeichen "") und die zweite als US (Dezimaltrennzeichen "." Und Tausendertrennzeichen ",") formatiert ist. Sagen wir die Quellennummer ist 765849739,88345 und in der EU-Tabelle brauche ich "765 849 739,88" und in der US-Tabelle […]

Warum kann ich meinen Projektnamen nicht ändern?

Ich versuche, meinen Excel-VBA-Projektnamen zu ändern, aber jedes Mal, wenn ich dies tue, wird immer wieder auf den 'Standardnamen' von VBAProject zurückgegriffen. Bisher habe ich versucht, das Projekt über das Eigenschaftsfenster und über Extras> VBA-Projekteigenschaften umzubenennen – beide Male habe ich das Dokument gespeichert, aber nach dem Schließen und erneutem Öffnen wurde der Name standardmäßig […]

Die Excel VBA-Abfrage ruft 0 für timewerte aus der Access-database ab

Meine VBA-Abfrage ruft zu Recht die data von Access to Excel ab. Die Werte für alle zeitbezogenen Felder werden jedoch als Null angezeigt. Was soll ich machen? With ActiveSheet.ListObjects.Add(SourceType:=0, Source:=Array(Array( _ "ODBC;DSN=MS Access Database;DBQ=D:\Fair\Macro Workings\Genie Trackers\Ac Genie.accdb;DefaultDir=D:\Fair\Macro Workings\Genie Trackers;DriverId=25;FIL=MS Access;MaxBufferSize=2048;PageTimeout" _ ), Array("=5;PWD="";UID=admin;")), Destination:=Range("$A$1")).QueryTable .CommandText = Array( _ "SELECT * FROM `D:\Fair\Macro Workings\Genie Trackers\Ac Genie.accdb`.DailyActivities […]

Excel 2013 VBA Kopieren eines Bereichs von 1 Tabelle und Kopieren in den Bereich in der zweiten Tabelle

Ich bekomme einen Fehler 1004 und bin mir nicht sicher warum. Ich benutze diesen ähnlichen Code in einem anderen Arbeitsbuch, und jetzt kann ich nicht herausfinden, was vor sich geht. Könnte mir jemand erklären, warum ich den Fehler bekomme? Ich habe das Internet recherchiert, aber scheint nicht zu helfen. Dim strNameMR As String, strSht As […]

datesduplikate: Hinzufügen eines Zählers für eine bestimmte Zeile am heutigen date (VBA / Qlik Sense)

Ich habe vor kurzem ein ziemlich einfaches Stück VBA-Code geschrieben, damit ich langfristig verfolgen kann, was ich jeden Tag trage. Dazu habe ich ein Makro mit einer Befehlsschaltfläche verbunden, und es sieht folgendermaßen aus: Private Sub WearingToday_Click() Dim NextCol As Long NextCol = Cells(1, Columns.Count).End(xlToLeft).Column + 1 Cells(1, NextCol).Value = Date Cells(ActiveCell.Row, NextCol).Value = "1" […]