"change Order Form"

Hi, I am wanting to create a spreadsheet for my stationary orders with some macro's and I have no idea on how to set this up. All the product information will be in Sheet 1 and the Order Form will be in Sheet 2 of the document.

In "sheet 1" we will make a list of all items that get ordered on a regular basis. This can be up to 500 items but
I have given you an example of 6 to play with.

We need the "QTY", "Unit Price" & "Total" in both "Sheet 1" and "Sheet 2" to sum up with a formula

Once the user has chosen the line item they will click on the "add" button next to the line item.

This will inturn take that particular line item and insert only the "Code", "Product", "Unit Price" & "Total" columns in "Sheet 2"
and leaving out the "Page Number", "Item Number" & "Description" & "QTY" fields to Sheet 2 (Order Form)
The user will manually change the "QTY" field on the "Sheet 2" (Order Form)


When the user selects another product and clicks "add" then this new line item will be added below the first line item
on Sheet2 (Order form) and so on.


Please have a look at my example which I have included In this email.

We will probably only be ordering 10 - 50 items each time so we wont need a huge list on the order form (Sheet 2)

Many thanks in advance everyone

Grant

Hi guys,
I hope you can help. I use excel to retrieve information from Synergy through ODBC. I have several sheets for each day of the month. What I do at the begining of every month is to edit every query for every day of the month and update the retrieval date and times. It is quite tedious. I've been doing it for 2 years and I would like to know if there any macro/script that can help me have the dates entered dynamically or with little user interaction. Here is the SELECT statement from the query ran

Code:

SELECT "NO:Release Order"."RO #", "NO:Release Order"."RO Type", "NO:Release Order".Category, "NO:Release Order".Status, "NO:Release Order"."Creation Date", "NO:Release Order"."Date & Time of Work", "NO:Release Order".Function, "NO:Release Order"."Job Type"
FROM "NO:Release Order" "NO:Release Order"
WHERE ("NO:Release Order".Category='SF') AND ("NO:Release Order".Severity='Critical') AND ("NO:Release Order".Status='Approved') AND ("NO:Release Order"."Creation Date">={ts '2009-07-22 00:00:59'} And "NO:Release Order"."Creation Date"<={ts '2009-07-22 23:59:59'}) OR ("NO:Release Order".Category='TC') AND ("NO:Release Order".Severity='Critical') AND ("NO:Release Order".Status='Approved') AND ("NO:Release Order"."Creation Date">={ts '2009-07-22 00:00:59'} And "NO:Release Order"."Creation Date"<={ts '2009-07-22 23:59:59'}) OR ("NO:Release Order".Category='SF') AND ("NO:Release Order".Severity='Critical') AND ("NO:Release Order".Status='New') AND ("NO:Release Order"."Creation Date">={ts '2009-07-22 00:00:59'} And "NO:Release Order"."Creation Date"<={ts '2009-07-22 23:59:59'}) OR ("NO:Release Order".Category='TC') AND ("NO:Release Order".Severity='Critical') AND ("NO:Release Order".Status='New') AND ("NO:Release Order"."Creation Date">={ts '2009-07-22 00:00:59'} And "NO:Release Order"."Creation Date"<={ts '2009-07-22 23:59:59'}) OR ("NO:Release Order".Category='SF') AND ("NO:Release Order".Severity='Critical') AND ("NO:Release Order".Status='Re-Scheduled') AND ("NO:Release Order"."Creation Date">={ts '2009-07-22 00:00:59'} And "NO:Release Order"."Creation Date"<={ts '2009-07-22 23:59:59'})
ORDER BY "NO:Release Order".Category

Thanks in advanced,

JP

I want to create a template in Excel for a change order system. Every time I have a new change order I want it to be numbered. I want Excel to automatically keep a log of all the changes orders to date with change order number, date, title, etc.

Please help.

Thanks!

Hi all,
I have a workbook template that has 31 sheets in it, the first 2 of which are defined by the template, the others can be user modified.
On the first sheet, there is a list of the names of the other sheets (amongst other data) in B3:B31, and I would like to be able to change the names of the associated sheets by changing these cells contents. The order of names in the list doesn't change, but the order of the sheets in the book can.
I have written the below code, which works, but is really slow, even just changing cells with the keypad causes it run and so hang for a second.
The other issue with it is that it refers to the sheets using their position in the book (sheets (ref)) which can change, or other sheets get inserted, but I dont know how to to apply the sheet# method of reference when the number needs to change. I know I can hard code a lot of this but would prefer a more elegant method.
I know there must be a much better way of doing this, but I cant work it out.



Code:

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
    
    For i = 3 To 31
    
    Set Target = Range("b3").Offset(i - 3, 0)
    If Target = "" Then Exit Sub
    On Error GoTo Badname
    Sheets(i).Name = Range("b3").Offset((i - 3), 0)
    Next i
    Exit Sub

Badname:
    MsgBox "Please revise the name." & Chr(13) _
    & "Do not include /, \, ?, etc, and " & Chr(13) _
    & "keep to less then 31 characters." & Chr(13)
    Range("b3").Offset(i, 0).Activate


End Sub

Thanks,

I have a word document with numerous standard fields that do not change. These fields are in a template format and have been bookmarked. I want to write a macro that allows a user that is in the Word doc to click an 'update' button and it retrieves the latest data from an Excel file. The Excel file will never change name and will always have the same three columns. But the data order will change (row order only) will change over time. The three columns in Excel are as follows:

Column A: Company Name
Column B: Data Field Description (ties back to the bookmarked fields in Word)
Column C: Data Field (this has the value / text that I want to be pulled into Word)

The Excel file is saved on a network drive and will not change location and the name will not change either.

What is the VBA code I need to allow these fields to be updated in Word. I am happy to 'hard code' the company name in the VBA code and then change it for each new template I create. It will only ever need to be done once per company.

This is what I have started with and it's really not working:

Code:

Private Sub CommandButton1_Click()

Dim myWB As Excel.Workbook


Set myWB = GetObject("H:\QPR\Sep 2009\Import Template.xls")

Selection.GoTo What:=wdGoToBookmark, Name:="Text5"


If (myWB.Sheets("DataDump").Cells(A1,A999) = "Company1" Then if myWB.Sheets("DataDump").Cells(B1:999) = "Senior Limit") Then
   
   'Return the value in column 3
   
   'Else leave the field as is
        
    End If

Next

Set myWB = Nothing

End Sub

Is this at all possible?