Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Dim str As String
str = "XHow are you"
str = Mid(str, 2)
MsgBox str
Sub DumpFirstChar()
Dim wb as Workbook
Dim ws as Worksheet
Dim x as long 'Row
Set wb = ActiveWorkbook
Set ws = wb.ActiveSheet
For x = 2 To Range("A65536").End(xlup).Row
ws.Cells(x,1).Formula = Mid(ws.Cells(x,1).Formula, 2)
Next x
Set ws = Nothing
Set wb = Nothing
End Sub
These preceding Xs are located at the beginning of every single string in an entire column
mintjulep said:Or just use Data | Text to Columns with the fixed width option, then delete the resultant row of X's or L's or whatever they are.