MOSHEHADAR
New member
אופיס 2013 - אקסל
החלפתי מחשב וקיבלתי עם אופיס 2013 (לפני כן היה אופיס 2010).
בקובץ אקסל שברשותי בו יש קוד VBA יש בעיה כדלקמן:
בקוד:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("e2:e50000")) Is Nothing Then
With Target(1, 0)
.Value = Date
.EntireColumn.AutoFit
End With
End If
End Sub
הקוד אמור לתת תאריך אוטומטית ועכשיו נותן EROR (מפעיל debugger).
בעיה של החלפת גרסת אקסל מ- 2010 ל - 2013 ?
תודה מראש.
החלפתי מחשב וקיבלתי עם אופיס 2013 (לפני כן היה אופיס 2010).
בקובץ אקסל שברשותי בו יש קוד VBA יש בעיה כדלקמן:
בקוד:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("e2:e50000")) Is Nothing Then
With Target(1, 0)
.Value = Date
.EntireColumn.AutoFit
End With
End If
End Sub
הקוד אמור לתת תאריך אוטומטית ועכשיו נותן EROR (מפעיל debugger).
בעיה של החלפת גרסת אקסל מ- 2010 ל - 2013 ?
תודה מראש.