Macrochanging(with sample)

  • Thread starter Thread starter naas
  • Start date Start date
N

naas

Hi Ron,

This is one.

Hopes it is enough.

Regards,

Naas



Sub adddelivery()
'
' adddelivery Macro
' Macro recorded 2003/04/30 by Naas Vermaak
'

'
ActiveSheet.Unprotect
Sheets("FIXED INPUTS").Select
Range("A49:J49").Select
Selection.Copy
Sheets("DELIVERIES").Select
Range("B27").Select
Selection.insert Shift:=xlDown
Range("B46:K46").Select
Selection.Delete Shift:=xlUp
Range("C27").Select

End Sub
 
Try removing the selections

ActiveSheet.Unprotect
Sheets("FIXED INPUTS").Range("A49:J49").Copy
Sheets("DELIVERIES").Range("B27").insert Shift:=xlDown
Range("B46:K46").Delete Shift:=xlUp



--
Don Guillett
SalesAid Software
(e-mail address removed)
naas said:
Hi Ron,

This is one.

Hopes it is enough.

Regards,

Naas



Sub adddelivery()
'
' adddelivery Macro
' Macro recorded 2003/04/30 by Naas Vermaak
'

'
ActiveSheet.Unprotect
Sheets("FIXED INPUTS").Select
Range("A49:J49").Select
Selection.Copy
Sheets("DELIVERIES").Select
Range("B27").Select
Selection.insert Shift:=xlDown
Range("B46:K46").Select
Selection.Delete Shift:=xlUp
Range("C27").Select

End Sub
Click to expand...
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Can Vba workout if a selection is part of a group? 0
moving all data to cell a1 4
Check if text doesn't fit in cell 4
code question 2
Problem with Macro 7
Macro Error 6
Hard reference in a macro 1
Macro for variable rows (fruit flies) 3

Back
Top