Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Eingabeaufforderung in Marko einbauen

Frage Microsoft Microsoft Office

Mitglied: cphowdy

cphowdy (Level 1) - Jetzt verbinden

28.12.2012, aktualisiert 15:41 Uhr, 2181 Aufrufe, 4 Kommentare

Hi,

ich möchte das eine CSV Datei mit einem Makro automatisch importiert und anschließend formatiert wird.
An und für sich kein Problem, nur ist bei der Aufnahme des Makros der Pfad zur CSV Datei natürlich absolut angegeben worden.
Ich würde nun gerne noch eine Eingabeaufforderung hinzufügen wo der User den Pfad zur Datei selbst eingeben kann bzw. das Marko so bearbeiten, dass es ist diesen Schritt nicht automatisch macht, sondern die Wahl der CSV Datei noch dem User überlässt. Versteht ihr ?!

Ums zu verdeutlichen, entweder soll dieser Teil des Makros über eine Eingabeaufforderung abgefangen werden:

01.
    With ActiveSheet.QueryTables.Add(Connection:= _ 
02.
        "TEXT;C:\Users\Downloads\2012-12.csv", Destination:=Range("$A$1")) 
03.
        .Name = "2012-12" 
04.
        .FieldNames = True 
05.
        ......
oder eben das Marko das gar nicht automatisiert machen lassen. Ich habe weder von der einen Lösung noch von der anderen eine Ahnung

Danke im Voraus!
cphowdy
Mitglied: 76109
28.12.2012, aktualisiert um 16:10 Uhr
Hallo cphowdy!

In etwa so:
01.
    Dim strFileToOpen As Variant 
02.
     
03.
    strFileToOpen = Application.GetOpenFilename("Csv Dateien (*.csv), *.csv") 
04.
 
05.
    If strFileToOpen <> False Then 
06.
        With ActiveSheet.QueryTables.Add(Connection:= _ 
07.
            "TEXT;" & strFileToOpen, Destination:=Range("$A$1")) 
08.
            .FieldNames = True 
09.
            '...... 
10.
             
11.
            .Delete 
12.
        End With 
13.
    End If
Gruß Dieter
Bitte warten ..
Mitglied: cphowdy
28.12.2012 um 18:30 Uhr
Sauber, hat funktioniert! Vielen Dank!
Bitte warten ..
Mitglied: 2hard4you
28.12.2012 um 19:33 Uhr
Zitat von cphowdy:
Sauber, hat funktioniert! Vielen Dank!

Warum markierst Du es dann nicht als gelöst??

24
Bitte warten ..
Mitglied: cphowdy
28.12.2012 um 19:50 Uhr
weil vergessen....done
Bitte warten ..
Ähnliche Inhalte
Windows 8
Eingabeaufforderung während der Installation
gelöst Frage von ThierryHenryWindows 85 Kommentare

Hallo Wenn ich von der Windows 8 64Bit DVD booten will und dann die Eingabeauforderung öffnen will mach ich ...

Microsoft Office
Excel Marko "private sub" bearbeiten
gelöst Frage von ArnoNymousMicrosoft Office2 Kommentare

Hallo, ich stehe auf dem Schlauch. Habe hier eine Exceltabelle mit einem Makro, dass mittels "private sub" nicht sichtbar ...

VB for Applications
Outlook Marko: Fenster nebeneinander zeigen
Frage von JohnWorksVB for Applications4 Kommentare

Hallo Zusammen, ich hatte vor mir ein kleines Makro zu schreiben was nachfolgendes Bewirkt: 1. Kalender öffnen: 2. Webbrowser ...

Microsoft Office
Dateinamen per VBA Marko ändern
gelöst Frage von mreskeMicrosoft Office13 Kommentare

Hallo ich möchte per Doppelklick einen über eine Inputbox vorgegebenen Dateinamen ändern: zum Hintergrund: ich habe ein Excel Datenblatt, ...

Neue Wissensbeiträge
Windows 10

Autsch: Microsoft bündelt Windows 10 mit unsicherer Passwort-Manager-App

Tipp von kgborn vor 17 StundenWindows 102 Kommentare

Unter Microsofts Windows 10 haben Endbenutzer keine Kontrolle mehr, was Microsoft an Apps auf dem Betriebssystem installiert (die Windows ...

Sicherheits-Tools

Achtung: Sicherheitslücke im FortiClient VPN-Client

Tipp von kgborn vor 19 StundenSicherheits-Tools

Ich weiß nicht, wie häufig die NextGeneration Endpoint Protection-Lösung von Fortinet in deutschen Unternehmen eingesetzt wird. An dieser Stelle ...

Internet

USA: Die FCC schaff die Netzneutralität ab

Information von Frank vor 1 TagInternet3 Kommentare

Jetzt beschädigt US-Präsident Donald Trump auch noch das Internet. Der neu eingesetzte FCC-Chef Ajit Pai ist bekannter Gegner einer ...

DSL, VDSL

ALL-BM200VDSL2V - Neues VDSL-Modem mit Vectoring von Allnet

Information von Lochkartenstanzer vor 1 TagDSL, VDSL2 Kommentare

Moin, Falls jemand eine Alternative zu dem draytek sucht: Gruß lks

Heiß diskutierte Inhalte
TK-Netze & Geräte
VPN-fähige IP-Telefone
Frage von the-buccaneerTK-Netze & Geräte16 Kommentare

Hi! Weiss noch jemand ein VPN-fähiges IP-Telefon mit dem man z.B. einen Heimarbeitsplatz gesichert anbinden könnte? Habe nur einen ...

Windows Server
GPO nur für bestimmte Computer
Frage von Leo-leWindows Server13 Kommentare

Hallo Forum, gern würde ich ein Robocopy script per Bat an eine GPO hängen. Wichtig wäre aber dort der ...

Windows Server
KMS Facts for Client configuration
Frage von winlinWindows Server13 Kommentare

Hey Leute, wir haben in unserem Netz nun einen neuen KMS Server. Haben Bestands-VMs die noch nicht aktiviert sind. ...

Windows Tools
Software-Tool zum Entfernen von bösartigem Windows
Frage von emeriksWindows Tools11 Kommentare

Hi, siehe Betreff hat das jemals irgendjemand schonmal sinnvoll eingesetzt? (MRT) E.