Hallo brauche euro hilfe.
ich lese per vb excell kundendaten ab diese soll bei knopfdurck zum Warenbegleitschein gehen.
und dort ein waren bild einfügen, zuerst sollte das vorige bild aber gelöscht werden. beim löschen habe ich probleme dass neu bild wird eingefügt aber soll zuerst das alte Löschen.
Beim Löschen habe ich problem es passiert nichts.
Habe es auch mit cells probiert auch kein erfolg.
Mein code:
Bedanke mich für eure hilfe im Voraus.
ich lese per vb excell kundendaten ab diese soll bei knopfdurck zum Warenbegleitschein gehen.
und dort ein waren bild einfügen, zuerst sollte das vorige bild aber gelöscht werden. beim löschen habe ich probleme dass neu bild wird eingefügt aber soll zuerst das alte Löschen.
Beim Löschen habe ich problem es passiert nichts.
Habe es auch mit cells probiert auch kein erfolg.
Mein code:
Code:
Private Sub CommandButton4_Click()
Dim Pfad As String
Dim oPic As Picture
Pfad = TextBox6
Sheets("Warenbegleitschein").Activate
/**ALTES BILD LÖSCHEN**/
Range("G9").ClearContents<= Das Löschen des Alten Bildes soll hier her zuerst löschjen
/**AB HIER BEGINT DAS EINFÜGEN DES BILDES UND TEXTES**/
Set oPic = ActiveSheet.Pictures.Insert(Pfad)
With Range("G9")
oPic.Left = .Left
oPic.Top = .Top
End With
Set oPic = Nothing
/**TEXT EINFÜGEN**/
Range("C5") = TextBox4.Value
End Sub
Bedanke mich für eure hilfe im Voraus.