Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Kalendersteuerelement
#1
Hallo,

hat sich bei diesem Element etwas über die lange Zeit geändert?

Ganz einfacher Code:

Option Explicit

Private Sub Calendar1_Click()
    datum = Calendar1
End Sub

Private Sub UserForm_Activate()
    Calendar1 = Date
End Sub

Private Sub CommandButton1_Click()
    For lngAnzahl = 2 To Worksheets.Count
        If Sheets(lngAnzahl).Name = datum Then
            Range("B1") = TextBox1
        Else
            MsgBox "Fehler!"
        End If
    Next
    Unload Me
End Sub

Gruß
Marcus

Ich arbeite mit Excel 2003 - Excel 2007 - Excel 365

Homepage im Aufbau (alte Daten müssen wieder hergestellt werden): http://ms-excel.eu

Wissen ist Macht - es ist aber nicht schlimm nicht alles zu wissen.
Man muss nicht alles wissen - man muss nur wissen wo es steht, oder wo man Hilfe bekommt.

Antwortento top
#2
Das gibt es schon 10 Jahre nicht mehr.
Zum übersetzen von Excel Formeln:

http://dolf.trieschnigg.nl/excel/index.p...gids=en+de
Antwortento top
#3
Hallo,

Dann haben wir schon mal eingegrenzt wie lange ich nicht mehr mit Excel arbeite. Brauche ich mich nicht zu wundern, dass alles auf einen Fehler raus läuft. Excel 365 kennt das Element komischer weise noch. Angezeigt wird es. Gibt es dafür einen Ersatz`?
Danke!!!

Gruß
Marcus

Ich arbeite mit Excel 2003 - Excel 2007 - Excel 365

Homepage im Aufbau (alte Daten müssen wieder hergestellt werden): http://ms-excel.eu

Wissen ist Macht - es ist aber nicht schlimm nicht alles zu wissen.
Man muss nicht alles wissen - man muss nur wissen wo es steht, oder wo man Hilfe bekommt.

Antwortento top
#4
(02.01.2020, 15:23)marose67 schrieb: Gibt es dafür einen Ersatz`?

Hallo, 19

hier mal ein möglicher Ersatz... 21
________
Servus
Case
[-] Folgende(r) 1 Benutzer sagt Danke an Case für diesen Beitrag:
  • marose67
Antwortento top
#5
Hallo,
danke für den Link.
Ich kann aber nur deutsch ... Konntest du nicht wissen.

Gruß
Marcus

Ich arbeite mit Excel 2003 - Excel 2007 - Excel 365

Homepage im Aufbau (alte Daten müssen wieder hergestellt werden): http://ms-excel.eu

Wissen ist Macht - es ist aber nicht schlimm nicht alles zu wissen.
Man muss nicht alles wissen - man muss nur wissen wo es steht, oder wo man Hilfe bekommt.

Antwortento top
#6
reicht schon:


Angehängte Dateien
.xlsb   __calendar_snb_UF.xlsb (Größe: 25,29 KB / Downloads: 14)
Zum übersetzen von Excel Formeln:

http://dolf.trieschnigg.nl/excel/index.p...gids=en+de
Antwortento top
#7
Hallo Marcos,

oder so was

DatePicker
   \\\|///      Hoffe, geholfen zu haben.
   ( ô ô )      Grüße, André aus G in T  
 ooO-(_)-Ooo    (Excel 97-2016)
Antwortento top
#8
Hallo André,

Danke - das habe ich mir direkt mal abgelegt.

Gruß
Marcus

Ich arbeite mit Excel 2003 - Excel 2007 - Excel 365

Homepage im Aufbau (alte Daten müssen wieder hergestellt werden): http://ms-excel.eu

Wissen ist Macht - es ist aber nicht schlimm nicht alles zu wissen.
Man muss nicht alles wissen - man muss nur wissen wo es steht, oder wo man Hilfe bekommt.

Antwortento top
#9
Hallo,

mir fiel gestern auf, das Excel noch immer ein Kalendersteuerelement anbietet. Wie spreche ich es an?
   

Habe folgenden Code geschrieben:

Zitat:
Option Explicit
Dim datum As Date
Dim lngAnzahl As Long
Private Sub Calendar1_Click()
    datum = Calendar1
End Sub

Private Sub UserForm_Activate()
    Calendar1 = Date
End Sub

Private Sub CommandButton1_Click()
    For lngAnzahl = 2 To Worksheets.Count
        If Sheets(lngAnzahl).Name = datum Then
            Range("B1") = TextBox1
        Else
            MsgBox "Fehler!"
        End If
    Next
    Unload Me
End Sub

Es läuft immer auf einen Fehler raus.

Gruß
Marcus

Ich arbeite mit Excel 2003 - Excel 2007 - Excel 365

Homepage im Aufbau (alte Daten müssen wieder hergestellt werden): http://ms-excel.eu

Wissen ist Macht - es ist aber nicht schlimm nicht alles zu wissen.
Man muss nicht alles wissen - man muss nur wissen wo es steht, oder wo man Hilfe bekommt.

Antwortento top
#10
(05.01.2020, 10:24)marose67 schrieb: … das Excel noch immer ein Kalendersteuerelement anbietet.

Moin!
Wäre mir neu, Marcus!
Wo sollte es bei den "weiteren Steuerelementen" zu finden sein?

Meines Wissens nach ist es immer noch so, dass sich dieses Steuerelement in einer .ocx-Datei befindet, die nicht mitgeliefert wird.
Entweder MSCOMCTL.ocx oder MSCOMCT2.ocx, die dann als Administrator im Betriebssystem registriert werden muss.

Es gibt (natürlich) Fundstellen im Netz, aber imo ist das nicht ganz legal (Urheberrecht MS).

Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag. 
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Antwortento top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste