Formular in Add-In
27.02.2004 15:05:27
Martin
Sub Programm()
Form.Show
With ThisWorkbook.VBProject _
.VBComponents("Form").Designer
.Controls("DatA").Value = DatumA
.Controls("DatB").Value = DatumB
.Controls("PathtoOpen").Caption = PathO
.Controls("DateiName").Caption = DateiN
End With
ThisWorkbook.Save
End Sub
Leider brauchte ich danach das Alles ins Add-in umzuwandeln, daher funktioniert das o.g. Code nicht mehr.
Ich habe allerdings erfolglos mit folgendes probiert:
Form.DatA.Value = DatumA
Form.DatB.Value = DatumB
Form.PathtoOpen.Caption = PathO
Form.DateiName.Caption = DateiN
Könnte mir Irgendjemand helfen?
Danke in Voraus,
Martin.