| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
HowTo add a period to front of EVERY text cell in a Excel column
I want to add a period to the FRONT of each different text string in a column
of text cells, How do I do this? example from this to this KQWLN .KQWLN ERULM .ERULM MQMLD .MQMLD TDQAH .TDQAH Thank you for your Answer |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
HowTo add a period to front of EVERY text cell in a Excel column
Adam,
If you only want one period: Sub Macro1() Dim myCell As Range For Each myCell In Range("A:A").SpecialCells(xlCellTypeConstants, 2) If Left(myCell.Value, 1) < "." Then myCell.Value = "." & myCell.Value Next myCell End Sub If you want another period whether one exists or not, simply delete this: If Left(myCell.Value, 1) < "." Then HTH, Bernie MS Excel MVP "adamcollegeman" wrote in message ... I want to add a period to the FRONT of each different text string in a column of text cells, How do I do this? example from this to this KQWLN .KQWLN ERULM .ERULM MQMLD .MQMLD TDQAH .TDQAH Thank you for your Answer |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
HowTo add a period to front of EVERY text cell in a Excel colu
Dear Bernie,
thank you so much for the reply, I have a slight follow on question, which is: could you show me what this subroutine would look like if the column of text was column B and I do not know how many rows long it is and adding only one period at the beginning to each text cell filled with text in that column B? Thank you! :) I really appreciate your considerations "Bernie Deitrick" wrote: Adam, If you only want one period: Sub Macro1() Dim myCell As Range For Each myCell In Range("A:A").SpecialCells(xlCellTypeConstants, 2) If Left(myCell.Value, 1) < "." Then myCell.Value = "." & myCell.Value Next myCell End Sub If you want another period whether one exists or not, simply delete this: If Left(myCell.Value, 1) < "." Then HTH, Bernie MS Excel MVP "adamcollegeman" wrote in message ... I want to add a period to the FRONT of each different text string in a column of text cells, How do I do this? example from this to this KQWLN .KQWLN ERULM .ERULM MQMLD .MQMLD TDQAH .TDQAH Thank you for your Answer |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
HowTo add a period to front of EVERY text cell in a Excel colu
Just change the Range("A:A") to Range("B:B") eg
Sub Macro1() Dim myCell As Range For Each myCell In Range("B:B").SpecialCells(xlCellTypeConstants, 2) If Left(myCell.Value, 1) < "." Then myCell.Value = "." & myCell.Value Next myCell End Sub Hope this helps Rowan adamcollegeman wrote: Dear Bernie, thank you so much for the reply, I have a slight follow on question, which is: could you show me what this subroutine would look like if the column of text was column B and I do not know how many rows long it is and adding only one period at the beginning to each text cell filled with text in that column B? Thank you! :) I really appreciate your considerations "Bernie Deitrick" wrote: Adam, If you only want one period: Sub Macro1() Dim myCell As Range For Each myCell In Range("A:A").SpecialCells(xlCellTypeConstants, 2) If Left(myCell.Value, 1) < "." Then myCell.Value = "." & myCell.Value Next myCell End Sub If you want another period whether one exists or not, simply delete this: If Left(myCell.Value, 1) < "." Then HTH, Bernie MS Excel MVP "adamcollegeman" wrote in message ... I want to add a period to the FRONT of each different text string in a column of text cells, How do I do this? example from this to this KQWLN .KQWLN ERULM .ERULM MQMLD .MQMLD TDQAH .TDQAH Thank you for your Answer |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
HowTo add a period to front of EVERY text cell in a Excel colu
Thank you! Rowan and Bernie, have a great thanksgiving.
"Rowan Drummond" wrote: Just change the Range("A:A") to Range("B:B") eg Sub Macro1() Dim myCell As Range For Each myCell In Range("B:B").SpecialCells(xlCellTypeConstants, 2) If Left(myCell.Value, 1) < "." Then myCell.Value = "." & myCell.Value Next myCell End Sub Hope this helps Rowan adamcollegeman wrote: Dear Bernie, thank you so much for the reply, I have a slight follow on question, which is: could you show me what this subroutine would look like if the column of text was column B and I do not know how many rows long it is and adding only one period at the beginning to each text cell filled with text in that column B? Thank you! :) I really appreciate your considerations "Bernie Deitrick" wrote: Adam, If you only want one period: Sub Macro1() Dim myCell As Range For Each myCell In Range("A:A").SpecialCells(xlCellTypeConstants, 2) If Left(myCell.Value, 1) < "." Then myCell.Value = "." & myCell.Value Next myCell End Sub If you want another period whether one exists or not, simply delete this: If Left(myCell.Value, 1) < "." Then HTH, Bernie MS Excel MVP "adamcollegeman" wrote in message ... I want to add a period to the FRONT of each different text string in a column of text cells, How do I do this? example from this to this KQWLN .KQWLN ERULM .ERULM MQMLD .MQMLD TDQAH .TDQAH Thank you for your Answer |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| How add a digit to front of number in each cell in excexl column | Excel Discussion (Misc queries) | |||
| HOW DO I PUT THE TEXT IN FRONT OF MY PICTURE IN EXCEL? | Excel Discussion (Misc queries) | |||
| How do I add an apostrophe in front of existing column in Excel? | Excel Discussion (Misc queries) | |||
| Formula for adding a comma in front of text in a cell | Excel Worksheet Functions | |||
| Howto use excel cell value to lookup an oracle table | Excel Discussion (Misc queries) | |||
Hybrid Mode
