Microsoft Office Forums

Go Back   Microsoft Office Forums > >

Reply
 
Thread Tools Display Modes
  #1  
Old 01-19-2011, 06:56 AM
kapnasty kapnasty is offline Help with tabs Windows 98/ME Help with tabs Office 2007
Novice
Help with tabs
 
Join Date: Jan 2011
Posts: 5
kapnasty is on a distinguished road
Default Help with tabs

Ok so I have a bunch of files that were created in word perfect and now have been converted into word. I need to find a way to use the replace all or a script function to add in the tabbing automatically.

I've attached a screen cap to this that shows on the top what I have and on the bottom what I want to convert to. If anyone can help point me in the right direction it would be much appreciated.



Btw I have Word 2007.
Attached Images
File Type: jpg clip_image002.jpg (33.6 KB, 15 views)
Reply With Quote
  #2  
Old 01-19-2011, 01:25 PM
macropod's Avatar
macropod macropod is offline Help with tabs Windows 7 32bit Help with tabs Office 2000
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 20,488
macropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant future
Default

Hi kapnasty,

Why do you want the tabs? It appears to me the paragraphs are all properly indented. If you add tabs, you'll have to remove the indenting to compensate, but then all lines after the first in each paragraph won't have any indenting.
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote
  #3  
Old 01-19-2011, 01:34 PM
kapnasty kapnasty is offline Help with tabs Windows 98/ME Help with tabs Office 2007
Novice
Help with tabs
 
Join Date: Jan 2011
Posts: 5
kapnasty is on a distinguished road
Default

Good question. Basically, these files are finding aids for researchers. Now the version up top without the tab arrows don't import correctly into microsoft access. The bottom version does import correctly into access and it allows us to provide researchers with additional services. Normally we could just go back and fix it but there are literally tens of thousands of pages that we would have to go through, and our staff is extremely small.
Reply With Quote
  #4  
Old 01-19-2011, 05:30 PM
macropod's Avatar
macropod macropod is offline Help with tabs Windows 7 32bit Help with tabs Office 2000
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 20,488
macropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant future
Default

Hi kapnasty,

For what you're asking, you'd probably need to use a macro to change the paragraphs from being indented to being tabbed. As different paragraphs have different levels of indenting, presumably you'd want the number of tabs to reflect that. The question then becomes:

Do the indented paragraphs have particular Word paragraph Styles applied, to differentiate them from each other, or at least a consistent level of indenting, so that one can programmatically modify them?
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote
  #5  
Old 01-20-2011, 06:57 AM
kapnasty kapnasty is offline Help with tabs Windows 98/ME Help with tabs Office 2007
Novice
Help with tabs
 
Join Date: Jan 2011
Posts: 5
kapnasty is on a distinguished road
Default

A macro would probably do it but since I am not very good at those I was looking to see if I could find some way to use the replace feature. The problem is identifying that indent as something that Word understands. Also the indents are all uniform (0.0, .38, .75 etc) but I haven't been able to use that yet. I feel like I'm close to finding the right recipe to make it work I was just hoping maybe someone could see something that I missed.
Reply With Quote
  #6  
Old 01-20-2011, 01:58 PM
macropod's Avatar
macropod macropod is offline Help with tabs Windows 7 32bit Help with tabs Office 2000
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 20,488
macropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant future
Default

If you can post back all of the indents, I can code a macro for you.
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote
  #7  
Old 01-21-2011, 06:30 AM
kapnasty kapnasty is offline Help with tabs Windows 98/ME Help with tabs Office 2007
Novice
Help with tabs
 
Join Date: Jan 2011
Posts: 5
kapnasty is on a distinguished road
Default

Wow that'd be great thanks. So here are the indents:

0, .38, .75, 1.13, 1.5, 1.88, 2.25, 2.63, 3, 3.38, 3.75, 4.13, 4.5, 4.88, 5.25, 5.63, 6, 6.38

Thanks again.
Reply With Quote
  #8  
Old 01-21-2011, 03:38 PM
macropod's Avatar
macropod macropod is offline Help with tabs Windows 7 32bit Help with tabs Office 2000
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 20,488
macropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant future
Default

Hi kapnasty,

Try the following macro:
Code:
Sub IndentToTab()
Dim oPara As Paragraph, i As Integer, StrInd
StrInd = Split("0,0.38,0.75,1.13,1.5,1.88,2.25,2.63,3,3.38,3.75,4.13,4.5,4.88", ",")
With ActiveDocument
  For Each oPara In .Paragraphs
    With oPara
      If .LeftIndent > 0 Then
        For i = 1 To UBound(StrInd)
          .Range.InsertBefore vbTab
          If .LeftIndent <= InchesToPoints(StrInd(i)) Then Exit For
        Next i
        .LeftIndent = 0
      End If
    End With
  Next
End With
End Sub
Note: I've assumed you indent measurements are in inches. If they're in centimeters, change 'InchesToPoints' to 'CentimetersToPoints'.

If you need to see how to install & run a macro, go to: http://www.gmayor.com/installing_macro.htm
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote
  #9  
Old 01-24-2011, 11:57 AM
kapnasty kapnasty is offline Help with tabs Windows 98/ME Help with tabs Office 2007
Novice
Help with tabs
 
Join Date: Jan 2011
Posts: 5
kapnasty is on a distinguished road
Default

Thanks for the help. It took me second to get it all figured out but I got it working now. It work sporadically but I think regardless we are going to have to just line by line review these documents. Thanks for trying though.
Reply With Quote
  #10  
Old 01-24-2011, 01:25 PM
macropod's Avatar
macropod macropod is offline Help with tabs Windows 7 32bit Help with tabs Office 2000
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 20,488
macropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant futuremacropod has a brilliant future
Default

Hi kapnasty,

If the code only works sporadically, that suggests your indenting is not consistent. If you find out what the other indents are, you could adjust them and re-run the macro.
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote
Reply

Thread Tools
Display Modes


Similar Threads
Thread Thread Starter Forum Replies Last Post
Decimal tabs with space as thousands separator harry Word 0 10-05-2010 03:22 PM
Multiple IExplorer Tabs open with link robertkjr3d Outlook 2 07-26-2010 11:30 AM
Creating custom tabs for Word & Excel 2003 on a Windows 7 OS Skarab Office 1 07-05-2010 09:23 AM
Create Multiple Tabs from Template TeePee Excel 0 04-30-2009 11:54 AM
Adjusting Tabs erselking Word 1 10-23-2008 02:57 PM

Other Forums: Access Forums - Senior Forums

All times are GMT -7. The time now is 08:51 PM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2020, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2020 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft