Microsoft Excel

Herbers Excel/VBA-Archiv

Frage zu speichern über VBA | Herbers Excel-Forum


Betrifft: Frage zu speichern über VBA von: Simone Baur
Geschrieben am: 07.01.2010 15:27:09

Hallo miteinander.

Ihr seit meine letzte Hoffnung...
Bastle gerade an einer Stammdatenbank. Ich habe hierfür über ein Drop Down Menü auch Bilder eingefügt.
Und zwar so:
ActiveSheet.Shapes.AddPicture(StBild, True, True, pos1, pos2, b, h).Name = "Bild"

Dieses ausgewählte Bild wird dann auch perfekt eingebettet. Alles OK.

Nun brauch ich eine Routine um dieses Blatt gefüllt mit Werten und einem Bild per Button abzuspeichern.
Das hab ich so gemacht:

Dim sFile As String, sPath As String
sPath = ThisWorkbook.Path & "\"
sFile = Range("B2").Value & "_" & _
Range("B3").Value & ".xls"
ActiveWorkbook.SaveAs sPath & sFile

Nun speichert er zwar ab, ABER das Bild verschwindet??? Warum das?

Weiters soll auf dem "neu" gespeichertem Excel-File die Bildauswahl nicht mehr
möglich sein. Sprich das Kombinationsfeld soll gelöscht werden.
Das Bild soll fixiert im neuen File eingefügt sein.

Ich bekome das einfach nicht hin... Bitte um Hilfe.

Gruß
Simone aus Tyrol

  

Betrifft: AW: Frage zu speichern über VBA von: Simone Baur
Geschrieben am: 07.01.2010 15:47:01

Speichern habe ich gelöst:

Dim sFile As String, sPath As String
sPath = ThisWorkbook.Path & "\"
sFile = Range("B2").Value & "_" & _
Range("B3").Value & ".xls"
ActiveWorkbook.SaveAs Filename:=sPath & sFile, FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False

Kontrollbox bleibt aber noch erhalten. Muss ich vor speichern deaktivieren.

Gruß
Simone


  

Betrifft: AW: Frage zu speichern über VBA von: Josef Ehrensberger
Geschrieben am: 07.01.2010 15:50:39

Hallo Simone,

um welches DropDown handelt es sich? (Gültigkeit, Steuerelement, Formular-Kombinationsfeld)


Gruß Sepp (auch aus Tirol)



Beiträge aus den Excel-Beispielen zum Thema "Frage zu speichern über VBA"