Excel vba: extract characters before delimiter in active cell

[2Took]

Hi,

Not looking for a Function.

1. Need VBA to extract left characters before delimiter "." in active cell and call it ExL
2. Need VBA to extract right characters before delimiter " - " in active cell and call it ExR

Got code below, but those are functions, don't need that:

If InStr(txt, char) > 0 Then Extract_LString = Left(txt, InStr(txt, char) - 2)

If InStr(txt, char) > 0 Then Extract_RString = Right(txt, InStr(txt, char) - 4)

 

[johnnyL]

That does not pertain to the original post so please start a new thread.

 

[2Took]

That does not pertain to the original post so please start a new thread.

I appreciate your help!
Share what your learning the VBA is from, if you feel like it

Figured out the scrolling:

ActiveWindow.ScrollColumn = Range(ExL & 1).Column

 

[johnnyL]

Self taught from googling.