I have a series of spredsheets that are linked, with all
the data coming from the first sheet. Rather than go cell
by cell to enter the data, I have set up a data form.
Ihave tried to write a macro that opens the data form at
the click of a buuton but it keeps stopping.

Code so far is:-

Sheets("Registration").Select
Range("B5:Y750").Select
Range("B5:Y750").Activate
Sheets("Registration").ShowDataForm

It stops at the last line. IS the syntax incorrect?