Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 12:23:24
19.04.2024 11:45:34
Anzeige
Archiv - Navigation
860to864
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
860to864
860to864
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

860to864: Makro-Programmierung

Makro-Programmierung
13.04.2007 13:05:00
Friedrich
Hallo zusammen,
meine Makro-Kenntnisse reichen mal wieder nicht :-(
Ich möchte in einer aus zwei Blättern bestehenden Excel-Datei von Blatt 1 aus ein Makro starten, welches das ausgeblendete Blatt 2 öffnet, in diesem Blatt 2 per SQL-Abfrage Daten aus einer Datenbank aktualisiert (welche im sichtbaren Blatt 1 weiterverarbeitet werden) und Blatt 2 anschließend wieder ausblendet. Habe hierzu mit dem Makro-Recorder folgendes Makro geschrieben welches aber auf den Laufzeitfehler 1004 stößt. Wer weiß Rat?
Hier mein Makro, "SQL" ist das Blatt 2 welches ausgeblendet sein soll, "1000" ist Blatt 1 welches für den Anwender sichtbar sein soll:

Sub Daten_aktualisieren()
' Daten_aktualisieren Makro
' Makro am 13.04.2007 von Miekley, Friedrich aufgezeichnet
Sheets("SQL").Visible = True
Range("B2").Select
Selection.QueryTable.Refresh BackgroundQuery:=False
Sheets("1000").Select
Range("B5").Select
Sheets("SQL").Select
ActiveWindow.SelectedSheets.Visible = False
Range("B2").Select
End Sub

Gruß Friedrich

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro-Programmierung
13.04.2007 15:08:02
Ingo
Hallo Friedrich,
so sollte es gehen.

Sub Daten_aktualisieren()
Sheets("SQL").Visible = True
Sheets("SQL").Activate
Range("B2").Select
Selection.QueryTable.Refresh BackgroundQuery:=False
Sheets("1000").Select
Deine weiteren Aktionen
Sheets("SQL").Visible = False
End Sub
mfG
Ingo Christiansen

AW: Makro-Programmierung
13.04.2007 15:20:00
Friedrich
Super, vielen Dank Ingo
Gruß und ein schönes WE, Friedrich

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige