Identify current column on a page

sts023 · #1 07-18-2019, 04:52 AM

In Word 2010 I have a landscape document which has three equal width columns on page 1, and 2 columns on page 2, the firsty being 1/3 of the width, the second being 2/3 of the width.

I have a variable (in terms of number of lines) amount of text in the first column of page 2, and I wish to insert three lines of text at the bottom of the first column on page 2, in a formatted box.
My plan was to identify how many lines are left in column 1 by inserting blank lines (vbLf) until the column number changes.
My problem is that the only references I can find to columns all seem to relate to tables, not to the current page.
Does anyone know how I can access the current page's current column number (if such a thing exists).
I've tried various "promising" methods, e.g.

Code:

'
' Code snippet
'
Dim grng                        As Word.Range
Dim intColNo                  As Integer
'

  Set grng = ActiveDocument.Content
  grng.Collapse Direction:=wdCollapseEnd
'The next line fails, telling me I'm not in a Table.
  intColNo = grng.Columns.Count
'The next line always returns -1.
  intColNo = grng.Information(wdEndOfRangeColumnNumber)

but I can't find one that works.
Can any kind soul help?

Thread Tools
Show Printable Version Email this Page
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Return nameof Left column in current view	trevorc	Excel Programming	7	09-19-2018 08:38 PM
Table adding cells to previous page with room still on current page.	gedet	Word	1	01-03-2018 10:35 AM
Identify last blank cell in column	mbesspiata	Excel	0	02-27-2015 11:29 AM
How to save the current page in a new file with all the page settings (header, footer	Jamal NUMAN	Word	6	03-15-2012 03:27 PM
Is there a way to automatically highlight the column and the row that of the current	Jamal NUMAN	Excel	8	02-14-2012 02:58 PM