Sprayzen
07-02-2009, 05:15 AM
Hi Guys,
I'm after some help and don't know if this can be done via VBA
Basically I have a string of data in cell A6 in which I want to search and pull a certain section of this data in a cell and move it to another worksheet
Example of text string would be 37 characters long as per below
Test help me11: 01234567899.help.me23
I want to be able to only send the 1234567899 to the alternate worksheet and strip the other bit of information out.
Any help would be a massive help
RwNum = 1
ColNum = ColNum + 1
For Each myCell In Sh.Range("A6:CC6") 'Cell moving data from
RwNum = RwNum + 1
Newsh.Cells(RwNum, ColNum).Formula = _
"='" & Sh.Name & "'!" & myCell.Address(False, False)
Next myCell '<-------------------END
I'm after some help and don't know if this can be done via VBA
Basically I have a string of data in cell A6 in which I want to search and pull a certain section of this data in a cell and move it to another worksheet
Example of text string would be 37 characters long as per below
Test help me11: 01234567899.help.me23
I want to be able to only send the 1234567899 to the alternate worksheet and strip the other bit of information out.
Any help would be a massive help
RwNum = 1
ColNum = ColNum + 1
For Each myCell In Sh.Range("A6:CC6") 'Cell moving data from
RwNum = RwNum + 1
Newsh.Cells(RwNum, ColNum).Formula = _
"='" & Sh.Name & "'!" & myCell.Address(False, False)
Next myCell '<-------------------END