Solved: Userform/sheet selection

[blackie42]

Hi,

I'm trying to get a userform to do 2 things and having trouble.

I'm using 'with activesheet' to commit the value of a number of textboxes
to a sheet called CMFSPLIT. I also want it to commit the value of another
couple of textboxes to another sheet called CMFRUN.

I want to do this for a number of paired sheets and trying the following which isn't working cos I know its wrong - but can't figure out how to fix it

[VBA][/VBA]If ActiveSheet = Worksheets("CMFSPLIT") Then
Worksheets("CMFRUN").Activate
Range("c16") = TextBox85.Value: Range("E16") = TextBox86.Value
End If[VBA][/VBA]

Any suggestions welcome

thanks
Jon

[blackie42]

[VBA][/VBA]If ActiveSheet = Worksheets("CMFSPLIT") Then
Worksheets("CMFRUN").Activate
Range("c16") = TextBox85.Value: Range("E16") = TextBox86.Value
End If

[georgiboy]

Without going to far into it, for me it would have to look more like this...

[VBA]If ActiveSheet.Name = "CMFSPLIT" Then
Worksheets("CMFRUN").Activate
Range("C16").Value = TextBox85.Value
Range("E16").Value = TextBox86.Value
End If[/VBA]

Hope this helps

[blackie42]

Thanks

I had the same code but instead of .name I used .value - what a numpty

cheers

[lucas]

Why activate it?

[VBA]

with Worksheets("CMFRUN")
.Range("C16").Value = TextBox85.Value
.Range("E16").Value = TextBox86.Value
end with

[/VBA]