i have the following script working , but need help on pasting value into
another sheet in this workbook, any help would be welcome. Thank You

Dim texzt as String
Private Sub cmdReport_Click()
Message = "Please Enter the Report Date"
Title = "Report Date Input Form"
Default = Date
MyValue = InputBox(Message, Title, Default)
texzt = MyValue
Workbooks("SOUTH CROSS BAYOU - DOR11").Sheets("SCBPg1").Range("D1") = texzt
End Sub