Free for PREMIUM members
[Webinar] Streamline your web hosting managementRegister Today
Public Sub x()
Dim r As Range
Dim c As Range
Set r = Sheet1.Range("A2:A" & Sheet1.UsedRange.Rows.Count)
For Each c In r.Cells
If Not (c.Value2 Like "x*") Then
c.Value2 = "x" & c.Value2
Open in new window
Public Sub Q_28375881()
Dim objCell As Range
For Each objCell In Range([A2], Cells(Cells.Rows.Count, 1).End(xlUp))
If IsNumeric(objCell) Then
objCell = "x" & objCell.Text
End If ' If IsNumeric(objCell) Then
Set objCell = Nothing
ZipGrep is a utility that can list and search zip (.war, .ear, .jar, etc) archives for text patterns, without the need to extract the archive's contents.
One of a set of tools we're offering as a way to say thank you for being a part of the community.
Please enter a first name
Please enter a last name
Must be at least 4 characters long.
Join and Comment
From novice to tech pro — start learning today.
Premium members can enroll in this course at no extra cost.
Premium members get this course for $349.00.
Premium members get this course for $151.20.
Premium members get this course for $159.20.
Premium members get this course for $122.40.