I have several cells that I need to delete the ' in front of text in that
cell. How do I write the code for this in VBA?

Hi,

Right click your sheet tab, view code and paste this in and run it.

Sub stantial()
Application.ScreenUpdating = False
For Each c In ActiveSheet.UsedRange
If Not c.HasFormula Then
c.Value = c.Text
End If
Next
Application.ScreenUpdating = True
End Sub

Mike

"iashorty" wrote:

> I have several cells that I need to delete the ' in front of text in that
> cell. How do I write the code for this in VBA?

On 5 Jun., 22:05, iashorty <iasho...@discussions.microsoft.com> wrote:
> I have several cells that I need to delete the ' in front of text in that
> cell. How do I write the code for this in VBA?

Hi

Look at this

Range("A1").Value = Mid(Range("A1").Value, 1)

Regards,
Per

If this is a contiguous block of data, select it and run

With Selection
.Value = .Value
End With

or this will work for everything. Select the cells and run

Dim cell As Range
For Each cell In Selection.Cells
cell.Value = cell.Value
Next

--
Tim Zych
www.higherdata.com
Compare data in worksheets and find differences with Workbook Compare
A free, powerful, flexible Excel utility



"iashorty" <(E-Mail Removed)> wrote in message
news:C00FEB58-27DD-434D-9DD3-(E-Mail Removed)...
>I have several cells that I need to delete the ' in front of text in that
> cell. How do I write the code for this in VBA?

Thanks, Tim. This worked for me and I was able to understand what I was doing.

IAShorty


"Tim Zych" wrote:

> If this is a contiguous block of data, select it and run
>
> With Selection
> .Value = .Value
> End With
>
> or this will work for everything. Select the cells and run
>
> Dim cell As Range
> For Each cell In Selection.Cells
> cell.Value = cell.Value
> Next
>
> --
> Tim Zych
> www.higherdata.com
> Compare data in worksheets and find differences with Workbook Compare
> A free, powerful, flexible Excel utility
>
>
>
> "iashorty" <(E-Mail Removed)> wrote in message
> news:C00FEB58-27DD-434D-9DD3-(E-Mail Removed)...
> >I have several cells that I need to delete the ' in front of text in that
> > cell. How do I write the code for this in VBA?
>
>
>