Macro Not Working

[Kevinax]

I wrote simple macro, saved it to "This Workbook", then saved the file to a network directory. The macro works perfectly fine for me and for a co-worker but not for a 3rd co-worker.

What could cause this?

 

[Kevinax]

Pardon my ignornance but what exactly do I do with Hal's code ...... do I copy it into a macro?

 

[par60056]

Pardon my ignornance but what exactly do I do with Hal's code ...... do I copy it into a macro?

replace your code

Sub FillLeft()
'
' FillLeft Macro
'
' Keyboard Shortcut: Ctrl+l
'
ActiveCell.Offset(0, 1).Range("A1").Select
Selection.Copy
ActiveCell.Offset(0, -1).Range("A1").Select
Selection.PasteSpecial paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub

with

Sub FillLeft()
'
' FillLeft Macro
'
' Keyboard Shortcut: Ctrl+l
'

ActiveCell = ActiveCell.Offset(, 1).Value
End Sub

 

[Kevinax]

Thanks everyone for your help.