Search results

  1. B

    shorter way to write an If, then, else statement in VBA.

    Thanks Guys, I do have the same text info in each report, different name, but the big difference is I have 3 pictures of each persons signature. I couldn't get get it to work by adding the pictures from a dropdown and using one report. when I add in Pictures from my dropdown the picture doesn't...
  2. B

    shorter way to write an If, then, else statement in VBA.

    Thanks pbaldy, I see what you mean on the last one I would just put Else DoCmd.OpenReport "PITP Piping (LetterSizePort) BLANK Rp", acViewPreview. And yes I did have End if. I must have missed it when copied the code. Thanks BBryan
  3. B

    shorter way to write an If, then, else statement in VBA.

    After re-reading your suggests. I think I may have not All of the code in. Just where i wanted to shorten the code. I have a button on my form that when I click on it depending on the name I what it to open a certain Report. Here is the full code. Private Sub Item_DblClick(Cancel As Integer)...
  4. B

    shorter way to write an If, then, else statement in VBA.

    Thanks plog, As you suggested I still am not sure how to link a query to this statement. I have a table with these people and I can Add a check mark and make a query. As for the logic ... This is the only way I know who to do this. the short story is If the textbox is blank or these people are...
  5. B

    shorter way to write an If, then, else statement in VBA.

    Hi All, I have an If, then, else statement in VBA. Is there a different shorter way to skinny the wording in VBA LIke useing IN (.., ...., ...., ) ect I have this but I have to add a whole bunch more names into it. ElseIf Parent![QAPerson] = "" Or Parent![QAPerson] <> "Bryan" Or...
  6. B

    AddImage from lookUp dropdown

    Hi All, If someone can help. I have a lookup table which stores QAPersonLookUpTbl QAPersonID - AutoNumber QAPerson - Text QAPersonSignature - OLE Object (this is a BMP filePicture) QAPersonInitial - OLE Object (this is a BMP filePicture) I have a table Review Tbl ReviewID...
  7. B

    Button to go to desktop from form

    I tried these and it doesn't work Application.FollowHyperlink "C:\Users\" & Environ$("UserName") & "\Desktop\" Application.FollowHyperlink Environ$("UserName") & "\Desktop\" Application.FollowHyperlink "C:\Users\" & Environ$("UserProfile") & "\Desktop\" But this works...
  8. B

    Button to go to desktop from form

    I tried this Application.FollowHyperlink Environ$("BBryan") & "\Desktop\" And This Application.FollowHyperlink Environ$(BBryan) & "\Desktop\" And it didn't work... Thanks BBryan
  9. B

    Button to go to desktop from form

    Yes I copied and pasted it and I do see username. Not sure why it is not working.... After looking on the internet for something else I just found this. And It works..... Application.FollowHyperlink Environ$("UserProfile") & "\Desktop\" Thanks All for your help. (I will need it again) Thanks...
  10. B

    Button to go to desktop from form

    Hi Gasman, Thanks I just tried it again. Still doesn't work. I am on windows 8.1 if that matters. Thanks BBryan
  11. B

    Button to go to desktop from form

    Thanks Namliam, I will read up on shell. I am not to familiar with it. It looks like it could be useful for me. BBryan
  12. B

    Button to go to desktop from form

    Thanks All, Sorry I still can't get the desktop to pop-up. This one shell("explorer.exe C:\Users\" & environ("UserName") & "\Desktop") put the documents Folder minimized on the task bar. Not sure how to use the other code you sent... from my button. Thanks BBryan
  13. B

    Button to go to desktop from form

    Hi Encarta, Thanks I am using that one but it would still not be my first choice. If there was something like " & environ("UserName") & " that could retrieve the computor name that would work better for me. (And the " & environ("UserName") & " gave me an error see above). I want it so it is a...
  14. B

    Button to go to desktop from form

    Hi All, Thanks this one again I get an run time error 490 cannot open specified file Application.FollowHyperlink "C:\Users\" & environ("UserName") & "\Desktop\" This one works CreateObject("Shell.Application").MinimizeAll But I really wanted to keep the database open and bring up the desktop...
  15. B

    Button to go to desktop from form

    Thanks for the help. On this one I get an error method or member not found Application.DoCmd.Minimise It is blue on the .Minimise Also on this one Application.FollowHyperlink "C:\Users\" & environ("UserName") & \Desktop\" I get an compile error syntax error and it shows the whole line in blue...
  16. B

    Button to go to desktop from form

    Hi All, I was trying from a button on my form that will go to and bring up the desktop. I want it so I can put this database on anyone's computer and the button will work. I am using this and it works but only on my computer. Application.FollowHyperlink "C:\Users\Bryan\Desktop\" I also tried...
  17. B

    Make folders from query

    Thanks I am always willing to learn....... Thanks BBryan
  18. B

    Make folders from query

    I see I have a couple of bad habit.... Thanks for your help It is appreciated! BBryan
  19. B

    Make folders from query

    Sorry the code tag didn't work thanks advanced is better! I put this in and I get an compile error Expected: end of statement on the last rs! strFolder = "C:\Users\bryan\Documents\" & rs!Tag & "\" & rs!Description & "\" rs!Sub System Also in my query I added a couple of the textboxes together...
  20. B

    Make folders from query

    thanks advanced is better! I put this in and I get an compile error Expected: end of statement on the last rs! strFolder = "C:\Users\bryan\Documents\" & rs!Tag & "\" & rs!Description & "\" rs!Sub System Also in my query I added a couple of the textboxes together to make a better title on the...
Back
Top Bottom