Formula And Dated Copy Online Excel and Excel Macro (VBA) Courses Copy Macro 'For online Excel courses click: https://www.excelsizeyeter.com/excelwithkenan.com/udemy_giris.php Sub DebutActivite() Dim Cel As Range ActiveSheet.Unprotect Set Cel = Range("B65536").End(xlUp).Offset(1, 0) With Cel .Value = Date .NumberFormat = "d-mmm-yy" .HorizontalAlignment = xlCenter With .Offset(0, 1) .Value = Now .NumberFormat = "hh:mm" .HorizontalAlignment = xlCenter End With End With End Sub Sub FinActivite() Dim Cel As Range Set Cel = Range("D65536").End(xlUp).Offset(1, 0) With Cel .Value = Now .NumberFormat = "hh:mm" .HorizontalAlignment = xlCenter With .Offset(0, 1) .FormulaR1C1 = "=RC[-1]-RC[-2]" '.Value = Time .NumberFormat = "hh:mm" .HorizontalAlignment = xlCenter End With End With ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True End Sub Report problem with this macro This macro does not work. There's an error in the code. Other You can write your comments about the error in the box below. Report error ALL MACROS Youtube Channel The following macros may be useful for you. Similar Results NoMacro Name 1 formula and dated copy 2 excel operators hk 3 find and copy and paste in macro 4 inserts months as sheet / pages Specifies days in detail 5 Copy and paste with macro 6 pushbutton pictures 7 add icons menus and buttons to the sheet / page 8 to assign a value to another sheet / page without selecting a formulated cell 9 special gluing options / format gluing design gluing formula gluing column width gluing transpose gluing 10 sheet / page address and set column width 11 a1e force to enter date with vba 12 copies the sheet / page and creates a sheet / page dated yesterday and assigns the information into it 13 copy the formula in the cell by the number of rows that have changed 14 search find copy to other sheet / page 15 Inputbox add year as summer 16 Select and delete columns for a1b1c1d1 (delete with hold) 17 copy a cell or cells 18 Type a1: c10 from the active cell 19 convert formula to value 20 conversion from formula to value