Word.Tips.Net Welcome toWord.Tips.Net

Helpful Links

Tips.Net Home
WordTips Home

Ask a Word Question
Make a Comment

Tips.Net Store

WordTips FAQ
WordTips Premium

Learn Access Now

Beauty Tips
Car Tips
Cleaning Tips
College Tips
Cooking Tips
Excel2007 Tips
ExcelTips
Family Tips
Gardening Tips
Health Tips
Home Tips
Money Tips
Organizing Tips
Pest Tips
Pet Tips
Wedding Tips
Word2007 Tips
WordTips

Advertise on the
WordTips Site

Newest Tips

Underlining Quoted Text

Changing Tabs Using the Ruler

Moving Drawing Objects

Standardizing Note Reference Placement

Selecting Printing of Color Pictures

Stubborn Foreign Languages

Sizing the Preview Pane

 

Using Seek In a Macro

Summary: When processing non-document text files in a macro, you have a wide range of commands available for your use. One of those is the Seek command, which allows you to position the internal file pointer within the text file. (This tip works with Microsoft Word 97, Word 2000, Word 2002, Word 2003, and Word 2007.)

Several other tips in other issues of WordTips discuss opening, reading, writing, appending, and closing text files. Another macro command associated with sequential text files is the Seek command. If used on an open file, it positions the internal file pointer at a specific character number in the file. The following code fragment is an example of how it is used:

Open "DOSTEXT.DAT" for Input as #1
iFileLen = LOF(1)
Seek 1, iFileLen / 2

These program lines use the LOF function to determine the length of the file. The last line then positions the internal file pointer half way through the file. All subsequent reading or writing of the file will take place from that position.

You can also use Seek as a function to determine your current position within a text file. This is what this code does:

iCurPos = Seek(1)

This command leaves the internal file pointer where it was, but sets iCurPos to a value representing how many characters into the file the pointer is. The iCurPos value is the position at which all subsequent reading and writing of the file will take place.

Tip #1385 applies to Microsoft Word versions: 97 | 2000 | 2002 | 2003 | 2007

Great Idea! Word is a tool to get what you really want—printed output. This means you need to make sure that Word works as well as possible with your printer, whether it is sitting on your desk or in a room down the hall.
 
Check out WordTips: Printing and Printers today!