Search results

Hi Folks, I have a form with a continuous sub form in it, I'm trying to get a keyword search to work. But as the continuous form is based on a union query from 3 tables I'm having a struggle. The keyword search is for one column only 'Product'. The problem is in two of the three tables the...

shall be modified with just the one FileCopy SourceFile, targetFile & Mid$(SourceFile, InStrRev(SourceFile, "")) placing the "Set objDialog = Nothing" after the last Next. Regards Tom Thank you for the reply Tom. I might try this! I have actually gone about it a different way and...

Does anyone know of a way I can change the destination (targetfile) in my code so the user can choose the target file location each time. Currently its set to one folder location. I thought about a msoFolderPicker but I dont know how to integrate it into my existing code. Private Sub...

Hi guys, I think I have fixed my problem... Sticking with the Boolean I just added changed the statement to true or false depending on the yes or no it appears to be working =] Private Sub SaveBtn_Click() Dim Response As Integer Response = MsgBox(Prompt:="Are you sure you want to Save this...

Hi jdraw, This is exactly what I want to do :) How could I achieve this? Thank you, Simone.

Hi Minty, Yes this is a bound form, I know save is automatic, I have added an Me.Undo on the before update event which runs if the save button hasn't been clicked however if the save button was clicked and the user clicked the response 'cancel' (also a Me.undo) When the user then goes on to...

Yes I have two buttons and each button has two options which work fine. The problem is the second button is dependant on the response chosen from the first button. My code currently tells the second button if the first button has been clicked or not but not what the response was. Which is...

Hi pbaldy, I'm not sure what you mean... This is the current code for the Save button: Private Sub SaveBtn_Click() buttonclicked = True If FormattedMsgBox("Do you want to save?" & _ "@Saving will add new Drawing Number to Master List" & vbNewLine & _ "Select 'Cancel' to Return to Record. @"...

Hi! I have a form with two command buttons Save and Exit(close) both have event procedures that bring up prompt message box's e.g. Are you sure you want to save? OK or Cancel Buttons The Exit button message box; Are you sure you want to exit without saving? Yes No buttons, only pops up if the...

Thank you! Will check it out :D

Hi Colin, Thank you, a) worked no problem error handling back on track! b) came back with compile error: Invalid attribute in Sub or Function; 'Global' Thanks, Simone.

Hi Tony, Great Video, very helpful will check out your other video's too. Thanks, Simone

Hi Colin, Sorry my mistake, I missed out the module in haste. Thanks for the tip added the code to a Command- SaveBtn Instead of 'before update' event procedure. I have got it working without the error handling as I was getting a Complie error: Variable not defined on; StrProc...

Thanks for the code Colin! I have tried it - see Image but I am getting an error..Any tips on the error code? Firstly it said FormattedMsgBox 'not defined' hence dim as string which cant be right :confused: Thanks, Simone.

Looks great Ridders, thank you I like the use of the Title-bar

Thank you for the tip Doc Man, I will consider a new Thread next time :] I will definitely look into using the Title-bar, it will look much neater!

Worked Perfectly! Thank you jdraw :]

Thank you all for your responses I'm sure I will find a fix I can used in one of your posts! :D

Anyway to get this to work with a prompt message box? I want the text on the first line in bold: Response = MsgBox(Prompt:="Do you want to save?" & vbNewLine & "Saving will add new Spec Number, Select 'No' to Cancel.", buttons:=vbYesNo) Thanks!

Thank you for your help!! Got it working :D