Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

Work log - primary emphasis, FAST

Posted on 2014-12-06
2
Medium Priority
?
84 Views
Last Modified: 2014-12-07
Attached is a notbook.  My goal is to make a few basic things happen

1. new entries happen from the top instead of the bottom.  
2. date/time should be automatic
3. no more than one line could be entered per item.

Assistance is greatly appreciated
Lined-Paper.docx
0
Comment
Question by:frugalmule
2 Comments
 
LVL 76

Accepted Solution

by:
GrahamSkan earned 2000 total points
ID: 40485297
Your document  has a table. The header row has two columns, but the rest of the table has only one, so it isn't clear where you want the date to go, but let's start with this;
Sub AddNote(strText As String)
    Dim tbl As Table
    Dim rw As Row
    
    Set tbl = ActiveDocument.Tables(1)
    Set rw = tbl.Rows.Add(tbl.Rows(2))
    rw.Cells(1).Range.Text = Date & " " & strText
End Sub

Open in new window

0
 

Author Closing Comment

by:frugalmule
ID: 40486055
This would have worked, but I found an even better solution by incorporating it into a spreadsheet that already exists in our process.
0

Featured Post

Ask an Anonymous Question!

Don't feel intimidated by what you don't know. Ask your question anonymously. It's easy! Learn more and upgrade.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Nice table. Huge mess. Maybe this was something you created way back before you figured out tabs or a document you received from someone else. Either way, using the spacebar to separate the columns resulted in a mess. Trying to convert text to t…
This article describes a method of delivering Word templates for use in merging Access data to Word documents, that requires no computer knowledge on the part of the recipient -- the templates are saved in table fields, and are extracted and install…
This video walks the viewer through the process of creating an MLA formatted document, as well as a bibliography with citations.
In a previous video Micro Tutorial here at Experts Exchange (http://www.experts-exchange.com/videos/1358/How-to-get-a-free-trial-of-Office-365-with-the-Office-2016-desktop-applications.html), I explained how to get a free, one-month trial of Office …
Suggested Courses

824 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question