Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
600to604
600to604
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Dateien aus Spalte A öffnen und speichern

Forumthread: Dateien aus Spalte A öffnen und speichern

Dateien aus Spalte A öffnen und speichern
18.04.2005 10:22:44
Jens
Guten Morgen
wie kann ich über VBA die in Spalte A stehenden Dateien öffnen und mit dem
Namen in Spalte B speichern.
In A2 - A55 steht der Dateiname der zu öffnen ist und in B2 - B55 der Name unter der die Datei neu gespeichert werden soll. Der Pfad ist immer D:\Reporting
Danke und Gruß
Jens
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Dateien aus Spalte A öffnen und speichern
18.04.2005 11:30:31
Harald
Hallo Jens,
frei nach dem Motto...besser als nix
ungetestet aus dem Handgelenk, mit einer Warnung, dass Du dann am Ende 55 Dateien gleichzeitig geöffnet hast ;-))....sofern alle Dateien vorhanden sind.

Sub DateiOeffnen()
Dim Filename As Long
for i = 2 to 55
Filename = "D:\Reporting" & cells(i, 1).Value & ".xls"
Workbooks.Open Filename
ActiveWorkbook.SaveAs Filename:= "D:\Reporting" & cells(i, 2).Value & ".xls"
next i
End Sub

Gruß
Harald
Anzeige
AW: Dateien aus Spalte A öffnen und speichern
18.04.2005 11:57:45
UweD
Hallo Jens
Hier meine Lösung:

Sub Sp_unter()
Dim Pfad$, LR%, I%, UrDat$, Neu$, Ja$
Dim doc As Object, olApp As Object
Pfad = "D:\Reporting\"
LR = Cells(Rows.Count, 1).End(xlUp).Row 'letzte Zeile der Spalte A
For I = 1 To LR
UrDat = ActiveSheet.Cells(I, 1).Value
Neu = ActiveSheet.Cells(I, 2).Value
If Neu = "" Then
MsgBox "Zielname in Zeile " & I & " fehlt."
Exit Sub
End If
Ja = Dir(Pfad & UrDat)
If Ja <> "" Then
Workbooks.Open Pfad & UrDat
ActiveWorkbook.Close Filename:=Pfad & Neu
Else
MsgBox "Datei: '" & UrDat & "' existiert nicht!"
End If
Next I
End Sub

Wenn du NICHTS an den Dateien änderst, könne das Makro die Datei eigendlich NUR copieren, ohne öffnen.. oder?
Gruß aus UD
Anzeige
;

Forumthreads zu verwandten Themen

screenshot als JPG speichern
heike

Hallo experten,
ich suche eine VBA - Lösung um einen Screenshot zu erzeugen und diesen als JPG abzuspeichern.
Eine Lösung, um eine BMPdatei zu speicher habe ich bereits (sieh unten).
Danke Nepumuk.
Am besten währe genau dieser Ansatz, weil ich das Bild beschneiden kann.
Nur...
16.12.2008 20:47:09
Thread-ID: 1033426
2 Beiträge
Bild aus Exceldatei speichern
Dave

Hallo,
habe ein Bild das sich in einer Exceldatei befindet und welches ich gerne
unter "Eigene Bilder" speichern möchte.
Habe aber keine Ahnung wie ich das Bild aus dieser Datei heraus bekomme.
Bitte um Hilfe
Gruß
Dave
13.02.2009 21:52:00
Thread-ID: 1050642
2 Beiträge
Einfügen aus Zwischenablage als Bild
Werner

Hallo!
Ich kann machen was ich will - ich finde nix zu meinem Problem:
In einer anderen Anwendung mache ich eine Hardcopy (also quasi ein Foto) mit Strg-c
Dieses Foto will ich als Bild über vba in eine Excel-Datei einfügen.
Das ist doch bestimmt ein ganz simpler Befehl oder?
...
18.02.2009 07:47:00
Thread-ID: 1051674
3 Beiträge
@ Sepp -- Bilder aus Word speichern
Dirk

Hallo Excelgemeinde!
(Sepp oder auch andere, die mir helfen möchten)
Ich habe von Sepp den unten aufgeführten Code. Der Funzt soweit auch gut.
Ich habe in den Code:
.documents(1).InlineShapes.Reset
eingebaut.
Damit schaffe ich es, dass das erste Bild im Document vor de...
04.05.2009 11:32:15
Thread-ID: 1072689
5 Beiträge
Dateiauswahldialog-Öffnen-Speichern win32-API
Werner

Hallo Excel Gemeinde,
ich bin durch Tino auf die
Win32-API Auswahldialogmethode gestoßen.
Vielen Excel-Usern mag dieses Thema bekannt sein, aber für diejenigen, die sich mit dem Thema:
Öffnen und Speichern von Dateien aus Excel heraus beschäftigen, lade ich nachfolgende Beispiel...
27.05.2009 13:53:21
Thread-ID: 1077696
4 Beiträge
Anzeige
geladenes Bild in Userform Image speichern
k

Hallo,
...habe in einer Userform das Element Picture drin und dieses wird mit Fotos aus einem Verzeichnis entsprechend geladen. Nun würde ich gern dem User die Möglichkeit geben - dieses Bild bei Bedarf unter eine Art "Datei speichern unter" für sich zu speichern.
Habe aber keine richti...
18.08.2009 13:46:40
Thread-ID: 1096746
9 Beiträge
Zelle als Bild speichern beschleunigen
Reinhard

Hallo Wissende,
nachfolgender Code macht schon das was ich mir erhoffte, er nimmt die Unicode Zeichen, die von A32 bis A65535 stehen und speichert sie als gif ab.
Dazu habe ich drei Fragen.
Wieso als Gif, im Code steht doch "Bitmap"? Ändere ich in
strFile = "c:\Test\meinBild" &...
12.02.2011 19:49:01
Thread-ID: 1200445
13 Beiträge
Anzeige
Dateiname aus Zellen aut.speichern
Wolfgang

Hallo,
der Dateiname eines Tabellenblatt soll aut.aus dem Inhalt von 2 Zellen des Tabellenblattes(Zelle D19 und D20)abgespeichert werden.
gibt es da eine Möglichkeit als makro
danke im voraus
17.05.2002 10:36:48
Thread-ID: 121594
3 Beiträge
Anzeige
Zwischenablage als Datei sichern (Bild!)
Frederik

Hallo,
ich habe schon eine Weile probiert & gesucht, aber noch keine Lösung gefunden, um im Makro einen markierten Zellbereich als Datei (Bild) abzuspeichern & dann in einem Mail als .Attachment anzuhängen.
Funktionierenden Mailcode habe ich bereits!
(Mag mit Outlook & d...
14.07.2011 14:56:04
Thread-ID: 1222154
3 Beiträge
Nach Bereich als Bild speichern, verzerrt
Stefan

Hallo zusammen,
mit folgendem Code kopiere ich einen Bereich und speichere ihn als Bilddatei ab. Allerdings ist das dann gespeicherte Bild extrem in die Breite gezogen. Hat jemand eine Idee, woran das liegt bzw. wie man es in normalen Größenverhältnissen speichern kann ?
Sub ScreenShot(...
27.01.2012 12:46:32
Thread-ID: 1248264
3 Beiträge
Anzeige
Tabellenbereich als Bild speichern
DirkR

Hallo Excelgemeinde,
ich versuche nun schon seit geraumer Zeit einen Tabellenbereich als Bild zu speichern.
Leider gelingt mir das nur sehr schlecht. Ich habe duzende Beiträge gefunden, ebensoviele Makros getestet. Aber leider stellt mich nichts von dem, was ich im Archiv finde, zufried...
13.02.2012 15:45:20
Thread-ID: 1250472
8 Beiträge
Bilder aus Excel heraus mit VB speichern
Thorsten

Hallo,ich moechte Bilder aus Excel heraus mit VB speichern. Allerdings habe ich nicht die genaue Ahnung in welchem Format die Bilder in Excel sind. Es handelt sich hierbei um Strassenkarten von MapPoint 2002 die ich in Excel importiert habe und die ich jetzt als jpg oder bmp Format speichern mo...
07.06.2002 18:33:38
Thread-ID: 126979
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige