Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations dencom on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by hext2003

  1. hext2003

    Print Specific Page from PDF File from Excel

    I have code like this in a module - Option Explicit Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _ ByVal hwnd As Long, _ ByVal lpOperation As String, _ ByVal lpFile As String, _...
  2. hext2003

    Print Specific Page from PDF File from Excel

    Sorry this is in the wrong place, I will put it under VB for Apps -
  3. hext2003

    Print Specific Page from PDF File from Excel

    I have code like this in a module - Option Explicit Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _ ByVal hwnd As Long, _ ByVal lpOperation As String, _ ByVal lpFile As String, _...
  4. hext2003

    Excel 2003 checkbox

    I've been working on this for hours! I thought this should be easy but was getting more frustrated the more things I tried. I should have come here sooner. Thx for the help everyone!
  5. hext2003

    Excel 2003 checkbox

    At first I had it in it's own Module... then I moved it onto Sheet 4 Why wouldn't it work as it's own Module???
  6. hext2003

    Excel 2003 checkbox

    Finally GOT IT I did Case 1 'Amended ChkBool = Sheets("Pg1").Amended.Value If ChkBool = True Then MyStr = MyStr & "Y" Else MyStr = MyStr & "N" End If I moved the Dim ChkBool as Boolean out of my function and declared it as a...
  7. hext2003

    Excel 2003 checkbox

    I created a Sub GetAmended(ChkBool As Boolean) ChkBool = Amended.Value End Sub function on the Sheet 1 Now I am calling this from Sheet 4 inside the code Case 1 'Amended ChkBool = Sheets("Pg1").GetAmended(ChkBool) If ChkBool = True Then MyStr = MyStr &...
  8. hext2003

    Excel 2003 checkbox

    I know this is killing me - it should be that simple right??? When I look at properties the name is Amended When I click on view code it goes to Private Sub Amended_Click() unless I am missing another place I believe it is named Amended. I'm still wondering if I need to do Sheets("Sheet...
  9. hext2003

    Excel 2003 checkbox

    I have a button on sheet 4 that triggers this code the check box "Amended" is on Sheet 1 do I need to do something more to get the value for Amended?
  10. hext2003

    Excel 2003 checkbox

    Why do I need a command button in addition to the check box?
  11. hext2003

    Excel 2003 checkbox

    I was expecting it to be booleean. I have tried Amended.Value = True Amended.Value = 1 Before this line of code it shows Amended = empty Now I am getting an "Object Required" error hmmmm I've changed it so many times not sure which line actually compiled.
  12. hext2003

    Excel 2003 checkbox

    Having some trouble using a checkbox. Tried both Form Field and Control Tool checkboxes Code that is giving me trouble is Case 1 'Amended If Amended.Value = vbChecked Then MyStr = MyStr & "Y" Else MyStr = MyStr & "N" End...
  13. hext2003

    Print a Report for each item in a query

    Sorry, I was just being stupid.... I thought I would have to walk thru the query printing each one separately. duuuuuhhhhhh I just linked the report right to the query and it printed all of the items.
  14. hext2003

    Print a Report for each item in a query

    I have a form. There is a check box on the form. If we want a one page report printed for this item we click on the check box. We go thru all of the current items and check this if we want to print this one page report (always the same report but different items). I now want to create a...

Part and Inventory Search

Back
Top