First of all, turn off you damn CAPS LOCK key. Typing in caps is
considered shouting and thus rude, and is hard to read. I can't
imagine what would possess someone to type in all caps.

Sheets("Sheet1").Range("A1").Value = "Vacancy"


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com






"cityfc" <cityfc@discussions.microsoft.com> wrote in message
news:E86C6087-4944-4454-A1CC-6AC17897426B@microsoft.com...
> THAT WORKS A TREAT THANKYOU SO MUCH I HAVE BEEN TRYING
> DIFFERENT WAYS WITHOUT
> SUCCESS FOR AGES
>
> COULD I BE CHEEKY AND ASK FOR A BIT MORE HELP
>
> NOW THAT THE CELLS CONTENTS HAVE MOVED SHEETS HOW DO I GET IT
> TO
> AUTOMATICALLY INSERT "VACANCY" IN THE CELL ON SHEET 1 A1
>
> THANKS AGAIN
>
> "Jim Thomlinson" wrote:
>
>> Here is the code...
>>
>> Sheets("Sheet2").Range("F2").value =
>> Sheets("Sheet1").Range("A1").Value
>>
>> Do you need help creating a button and adding the code to the
>> button?
>> --
>> HTH...
>>
>> Jim Thomlinson
>>
>>
>> "cityfc" wrote:
>>
>> > I have a name on sheet1 in cell a1 and when i click a button
>> > i want the
>> > contents of a1 pasting to f2 on sheet 2
>> >
>> > Thank You for your help in advance.
>> >
>> >