Dynamic Path Name 2

[onefootout]

This is driving me nuts!

I have a button that opens a MS word doc, but I have to enter the string, like so.


Private Sub Command0_Click()

Dim HWordDoc As String
Dim oApp As Object

HWordDoc = "C:\Whatever.doc"

If Dir(HWordDoc) = "" Then
MsgBox "Document Not Found"
Else
Set oApp = CreateObject("Word.Application")
oApp.Visible = True
oApp.Documents.Open Filename:=HWordDoc
DoCmd.Maximize

End If

End Sub

How can I make the path string into something dynamic, so a user could pick from a list and populate it? I have a table with path strings and associated names.

I tried using a query to at least pick the right name and path, and maybe set some variable and go from there, but that got me nowhere.

Can I code query commands in onClick events? Should I do this some other way? Arg! I'm just so stinking frustrated.

 

[genomon]

Why can't you populate a combo box from your table, and set HWordDoc = to its value?

Sure, the early bird gets the worm, but the second mouse gets the cheese in the trap.

 

[onefootout]

It must be my code, because when I try that, and I click the button, and nothing happens. No error, no nothing.

Private Sub Command0_Click()

Dim HWordDoc As Object
Dim oApp As Object

HWordDoc = [pickname]

If Dir(HWordDoc) = "" Then
MsgBox "Document Not Found"
Else
Set oApp = CreateObject("Word.Application")
oApp.Visible = True
oApp.Documents.Open Filename:=HWordDoc
DoCmd.Maximize

End If

End Sub

It's selecting from a combo box, which has 2 columns, Name and Path. Do I have to somehow specify the 2nd column (path)?

 

[TheAceMan1]

How are ya onefootout . . .

. . . and this:

[blue]    Dim oApp As Object, HWordDoc [purple][b]As String[/b][/purple]

    HWordDoc = Me![purple][b]ComboboxName.Column(1)[/b][/purple]
    
    If Dir(HWordDoc) = "" Then
      MsgBox "Document Not Found"
    Else
      Set oApp = CreateObject("Word.Application")
      oApp.Visible = True
      oApp.Documents.Open Filename:=HWordDoc
      DoCmd.Maximize
    End If[/blue]

See Ya! . . . . . .

Be sure to see thread181-473997

 

[onefootout]

YES!!! That works!

AceMan, you are the Acey-est of them all. Thank you too, genomon for pointing me in the correct direction! I was tearing my hair out!

For the record, the path name is in the 2nd column of the combo box. I set that column width to 0 (in the control properties) so it couldn't be seen.

Thanks Again!