Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 9
Default Vertical Lines in Cells - Delimited???

Thank you very much to both of you. I now know how to remove the vertical
lines and can write a macro to do that for me. I am trying to create macros
for copying cell ranges between two worksheets and workbooks. I have other
posts addressing the problems I'm having with that too. If you can help
there it would be very much appreciated.

Living and learning more than I want to?

"Dave Peterson" wrote:

And on my USA keyboard, I have a (broken) vertical bar on the backslash key
(shift-backslash key). It's directly above the Enter key.

I don't know why the columnwidths would go wacky, though.

Saved from a previous post:

Chip Pearson has a very nice addin that will help determine what that
character(s) is:
http://www.cpearson.com/excel/CellView.aspx

You may be able to use Edit|Replace to change the character--Some characters can
be entered by holding the alt-key and typing the hex number on the numeric
keypad. For example, alt-0010 (or ctrl-j) can be used for linefeeds. But I've
never been able to get alt-0013 to work for carriage returns.

Another alternative is to fix it via a formula:

=substitute(a1,char(##),"")
or
=substitute(a1,char(##)," ")

Replace ## with the ASCII value you see in Chip's addin.

Or you could use a macro (after using Chip's CellView addin):

Option Explicit
Sub cleanEmUp()

Dim myBadChars As Variant
Dim myGoodChars As Variant
Dim iCtr As Long

myBadChars = Array(Chr(##), Chr(##)) '<--What showed up in CellView?

myGoodChars = Array(" ","") '<--what's the new character, "" for nothing?

If UBound(myGoodChars) < UBound(myBadChars) Then
MsgBox "Design error!"
Exit Sub
End If

For iCtr = LBound(myBadChars) To UBound(myBadChars)
ActiveSheet.Cells.Replace What:=myBadChars(iCtr), _
Replacement:=myGoodChars(iCtr), _
LookAt:=xlPart, SearchOrder:=xlByRows, _
MatchCase:=False
Next iCtr

End Sub

If you're new to macros:

Debra Dalgleish has some notes how to implement macros he
http://www.contextures.com/xlvba01.html

David McRitchie has an intro to macros:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

Ron de Bruin's intro to macros:
http://www.rondebruin.nl/code.htm

(General, Regular and Standard modules all describe the same thing.)

Challenger wrote:

Can't find the vertical line character anywhere to place in the find/replace.
Can delete from each cell in the formula bar, but then the column widths go
whacky.

"Dave Peterson" wrote:

Edit|Replace???

Challenger wrote:

I have a spreadsheet that has been formatted from a Crystal Report. There is
a vertical text line at the right hand side of several of the cells. I want
a quick way to remove these lines so that the data can be copied and used in
formulas and macros.

--

Dave Peterson


--

Dave Peterson

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
I want horizontal and vertical lines David Ames Excel Worksheet Functions 0 June 26th 08 04:31 PM
horizontal lines to vertical [email protected] Excel Discussion (Misc queries) 5 February 11th 08 01:52 PM
Vertical lines Enna Charts and Charting in Excel 2 December 7th 06 04:16 PM
I just want lines to appear on my worksheet vertical and horizont Scout Excel Worksheet Functions 5 December 2nd 06 01:24 AM
Vertical Lines on the Lines on 2 Axes Chart [email protected] Charts and Charting in Excel 3 March 3rd 06 04:14 AM


All times are GMT +1. The time now is 08:07 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"