Biblical Illustrator - 4 Books (Matthew, Mark, Luke and John)

https://community.logos.com/discussion/comment/370194#Comment_370194

Perhaps Robert could let me know what his schedule is like.

Good evening.

Since the Forum apparently has a 4MB or so limit on files, we'll experiment with (what I think is) a new DropBox feature that allows sharing at large with a link.

I have done the John files, one with bible milestones, one with bible milestones and page #s.

The file that doesn't have the page #s is here:

https://www.dropbox.com/sh/gjspyw267tj0jb8/PD5DFDDVZP

The file that does have page #s is here:

https://www.dropbox.com/sh/ue5q3ta4pnyzz0h/khqIAs7T0i

These same folder will have the other 3 files (I think) in a few minutes.

https://community.logos.com/discussion/comment/370219#Comment_370219

Thank you!

Allen Browne

Thanks, George

Keep Smiling 4 Jesus :)

https://community.logos.com/discussion/comment/370194#Comment_370194

... did a search in my fairly large library, out of curiosity, for wedding sermons ...

Wonder if a search of Heading Text:Large Text in Entire Library for:

wedding NEAR (ceremony,sermon)

finds more to ponder:

Keep Smiling [:)]

https://community.logos.com/discussion/comment/370219#Comment_370219

Since the Forum apparently has a 4MB or so limit on files, we'll experiment with (what I think is) a new DropBox feature that allows sharing at large with a link.

Thanks Robert, the files came down fine. FYI, I have used Dropbox links on these forums before and they work very well!

https://community.logos.com/discussion/comment/370271#Comment_370271

If you look through the files with Page Numbers, there are spots where a bunch of page numbers are all grouped together. I have seen this before, when using macros to apply Page Numbers Word has trouble with large files; it does not repaginate fast enough and drops them all in the wrong place. I have not found a way to fix this automatically, maybe our macro guru Steve Clark has an idea! The page number macros basically has to be slowed down...

https://community.logos.com/discussion/comment/370274#Comment_370274

Maybe if I force a good, full repagination run prior the macro. I'll give it a shot tonight (US-EDT). I'll re-check the Pentateuch files, also.

Nord Zootman

Thanks George!

Gary Pajkos

https://community.logos.com/discussion/comment/370283#Comment_370283

Thanks again. I asked for more books and got it. Thanks, Thanks, Thanks.

https://community.logos.com/discussion/comment/370279#Comment_370279

I'll give it a shot tonight (US-EDT).

I have fixed the "with page #" Gospels, plus Genesis, Exodus. I'll fix the remaining 3 tomorrow evening, since I am falling asle.....

[nap-jerk] Oh, and here are the links again for the most recent versions:

WITH PAGE NUMBERS and Bible milestones

NO PAGE #s, but with Bible milestones

I altered the page macro to force repagination every 100 pages, which worked, with the exception of the last 8 pages, which I fixed manually (must be a flow-control issue, go figure).

https://community.logos.com/discussion/comment/370468#Comment_370468

Thanks for the great work Robert! Just curious, how did you fix the page number issue? That has irked me in some of my own PBs...

https://community.logos.com/discussion/comment/370468#Comment_370468

I'll fix the remaining 3 tomorrow evening

Lev, Num, Deut have been fixed. The links are repeated below:

WITH PAGE NUMBERS and Bible milestones

NO PAGE #s, but with Bible milestones

https://community.logos.com/discussion/comment/370511#Comment_370511

how did you fix the page number issue?

Dominick:

I fixed it by putting a counter in the macro that forces a repagination every 100 pages. I also added Word page numbers in the header (for easy verification) and manually forced a repagination by dragging the scroll button down before running the macro. Oddly, the macro gives up near the end, i.e., in a 900 page doc, the last 3-4 pages didn't have the milestone. (Probably because the page count increases as all the page milestones are added.) But it is a trivial matter to put those in manually. If the real programmers out there promise not to taunt me [:S], the so-called code is below. Basically, I start out using old old Basic flow-control that I learned long ago, and then throw things at it until it does what i want. I also do a lot of "borrowing" from code snipets on the web. ("Good composers borrow, great composers steal" - Stravinsky or Elliot or somebody).

All: FYI:

I would also like to reiterate that these page #s are based simply on Word's pagination and have nothing to do with the original publications, and therefore would have no meaning in a citation. I put them in to enable the Read Aloud feature, and to provide a relative reference within the resource.

Code:

Sub PageMilestoneWordPagination()

Dim rngPage As Range

Dim iCurrentPage As Integer

Dim iPageCount As Integer

Dim Counter As Integer

Application.ScreenUpdating = False

Selection.HomeKey Unit:=wdStory

Selection.TypeText Text:="[[@Page:1]]"

ActiveDocument.Repaginate

Set docToNumber = ActiveDocument

Set rngPage = docToNumber.Range

iCurrentPage = 1

Counter = 0

iPageCount = docToNumber.Content.ComputeStatistics(wdStatisticPages)

Do Until iCurrentPage > iPageCount

If iCurrentPage = iPageCount Then

rngPage.End = ActiveDocument.Range.End

Else

Selection.GoTo wdGoToPage, wdGoToAbsolute, iCurrentPage + 1

Selection.TypeText Text:="[[@Page:" + CStr(iCurrentPage + 1) + "]]"

rngPage.End = Selection.Start

Counter = Counter + 1

If Counter = 100 Then

ActiveDocument.Repaginate

Counter = 0

Else

End If

iCurrentPage = iCurrentPage + 1 'move to the next page

Loop

Application.ScreenUpdating = True

Selection.HomeKey Unit:=wdStory

End Sub

https://community.logos.com/discussion/comment/370736#Comment_370736

Thanks again, Robert! [H]

https://community.logos.com/discussion/comment/370762#Comment_370762

Very nice, thanks for the code and explanation Robert!

https://community.logos.com/discussion/comment/370468#Comment_370468

Note: an additional edit was made in the Pentateuch files and the Gospels except John. The abbreviation used for Deuteronomy wasn't recognizable by Logos.

See this thread (HT: Michael) for details and if you've compiled the books, you can easily fix yourself or re-download and recompile.

mab

https://community.logos.com/discussion/comment/372799#Comment_372799

Robert

I'm wondering if the Title Page for Matthew's docx somehow got lopped off; it's the only one in all of them so far that doesn't show a Title Page. No issue on the utility, but it would be nice for consistency's sake.

Michael

https://community.logos.com/discussion/comment/372888#Comment_372888

Robert

I'm wondering if the Title Page for Matthew's docx somehow got lopped off; it's the only one in all of them so far that doesn't show a Title Page. No issue on the utility, but it would be nice for consistency's sake.

Michael

Ran into that same issue... for some reason, the source docx file thinks that portion of the file is an embedded Word file... just double click on it, copy the contents to clipboard, delete the embedded file, then paste the contents (but not the embedded file) back into the original source file. Problem solved... :-)

mab

https://community.logos.com/discussion/comment/372901#Comment_372901

Quote

After an unproductive wrestling match with the embedded info, I cut it, grabbed the info from the Mark BI title page, pasted it in and changed the name to Matthew. I'm using LibreOffice which might be why I couldn't run it the same way, but this worked.

Jack Caviness

https://community.logos.com/discussion/comment/372901#Comment_372901

Problem solved...

But doesn't this make the page numbers inaccurate?