Date in userform textbox is deleted when date is selected in other textbox from Calender.

[sathyaganapathi]

Hi all,
I have peculier issue in excel userform.
There are two text boxes in a user form to capture the dates.
One is the sample input date and other one is for entering the date of a particular activity.
The date in first text box is inserted using below code.

Private Sub FIInputDatePick_click()
    Me.txtDate.SetFocus
    Me.txtDate.Value = VBA.Format(Now(), "mm/dd/yyyy HH:mm")
End Sub

and the date in second textbox with below code. I use a Selected_datetime function to select a date from a calender.

Private Sub FileCheck1Datepick_Click()
Call Date_Time_Picker.Selected_DateTime(frm_PlabFinalLog.FileCheck1Date)
    frm_PlabFinalLog.FileCheck1Date.Value = VBA.Format(frm_PlabFinalLog.FileCheck1Date.Value, "mm/dd/yyyy hh:mm")
End Sub

The problem is, when the second code us run, the date in the 1st textbox is getting deleted automatically. There is no connection or link between two codes. But, both are in same userform.
Could anybody please help on this? Please let me know if more info is need to find the problem...
Thanks.

 

[rlv01]

What if you saved the TextBox value and restored it later?

Private Sub FileCheck1Datepick_Click()
Dim SaveDate As String
    
    SaveDate = Me.txtDate.Value
    Call Date_Time_Picker.Selected_DateTime(frm_PlabFinalLog.FileCheck1Date)
    frm_PlabFinalLog.FileCheck1Date.Value = VBA.Format(frm_PlabFinalLog.FileCheck1Date.Value, "mm/dd/yyyy hh:mm")
    Me.txtDate.Value = SaveDate
End Sub

 

[sathyaganapathi]

What if you saved the TextBox value and restored it later?

Private Sub FileCheck1Datepick_Click()
Dim SaveDate As String
   
    SaveDate = Me.txtDate.Value
    Call Date_Time_Picker.Selected_DateTime(frm_PlabFinalLog.FileCheck1Date)
    frm_PlabFinalLog.FileCheck1Date.Value = VBA.Format(frm_PlabFinalLog.FileCheck1Date.Value, "mm/dd/yyyy hh:mm")
    Me.txtDate.Value = SaveDate
End Sub

Dear rlv01,
Thanks for the input. I tried with the above code and still the date is getting deleted.

I tried by modifying your code as below and checked again. But, result is, again the date is getting deleted.

Private Sub FIInputDatePick_click()
Dim SaveDate As String
    Me.txtDate.SetFocus
    Me.txtDate.Value = VBA.Format(Now(), "mm/dd/yyyy HH:mm")
    SaveDate = Me.txtDate.Value
End Sub

Private Sub FileCheck1Datepick_Click()
Dim SaveDate As String
    Call Date_Time_Picker.Selected_DateTime(frm_PlabFinalLog.FileCheck1Date)
    frm_PlabFinalLog.FileCheck1Date.Value = VBA.Format(frm_PlabFinalLog.FileCheck1Date.Value, "mm/dd/yyyy hh:mm")
    Me.txtDate.Value = SaveDate
End Sub

any other possibilities please?

 

[rlv01]

Use the VBE editor to single-step through each statement your code until you find the statement that is deleting the date from the other TextBox

 

[sathyaganapathi]

Use the VBE editor to single-step through each statement your code until you find the statement that is deleting the date from the other TextBox

Hi rlv01,
Since I am using userform and not expert in VBA coding, I could not check with VBA Editor.. Could you please let me know how to check single-step chekc through VBA Editor when using userform?
Thanks.

 

[rlv01]

The VBA Editor (or more commonly known as VBE) is the tool used to create, modify and maintain Visual Basic for Applications (VBA) procedures and modules in Excel. You access it from Excel with Alt-F11. If you have been making changes to your UserForm code then you are already using VBE. To single step code, watch this tutorial.

Excel VBA Beginner Tutorial

Excel VBA Beginner TutorialGet Ad-Free Training by becoming a member today!https://www.youtube.com/channel/UCqyBfm_H9ugGirk1ufYA2YA/joinExercise Files: https...

tinyurl.com

The relevant portion starts at 1:21:39.

 

[sathyaganapathi]

The VBA Editor (or more commonly known as VBE) is the tool used to create, modify and maintain Visual Basic for Applications (VBA) procedures and modules in Excel. You access it from Excel with Alt-F11. If you have been making changes to your UserForm code then you are already using VBE. To single step code, watch this tutorial.

Excel VBA Beginner Tutorial

Excel VBA Beginner TutorialGet Ad-Free Training by becoming a member today!https://www.youtube.com/channel/UCqyBfm_H9ugGirk1ufYA2YA/joinExercise Files: https...

tinyurl.com

The relevant portion starts at 1:21:39.

Hi rlv01,
Thanks for the link and the guidance! I will go through it soon. As I was away from the station for few days, I could not see your post...!
Thanks again.
Best regards.