Recent content by Symon

Thanks Ranman I went with the following in the end. Thanks for taking the time to reply Private Sub AddRecord_Click() Dim lngRecordStart As Long Dim lngRecordEnd As Long Dim x As Integer 'For x = 1 To (Me.Amount.Value - 1) For x = 1 To (Me.Amount.Value - 1)...

Hi All, I have a button that duplicates records 'X' amount of times based on a value in a text box. I need a message box to advise the user that they have created record number from - to Eg User creates 5 records - first record created has a auto number of 3200 I need the message box to...

Will do, I do normally use this method, just being quite impatient with this today.. :banghead: thanks again...:D

Brilliant, Cant thanks you enough for your help today Uncle Gizmo. Here is the finished working VB Private Sub AddRecord_Click() On Error GoTo AddRecord_Click_Err Dim x As Integer For x = 1 To (Me.Amount.Value - 1) DoCmd.RunCommand acCmdSelectRecord DoCmd.RunCommand...

Thanks, Works a treat... Made 5 new records with one click... Just need to get it to run the amount of times stated in a text box now.

Thanks Unlce Gizmo, Ill give it a go...

here is the VB for the duplicate button... Could this be looped based on a value put in a textbox? Private Sub AddRecord_Click() On Error GoTo AddRecord_Click_Err On Error Resume Next DoCmd.RunCommand acCmdSelectRecord If (MacroError = 0) Then DoCmd.RunCommand acCmdCopy...

The duplicate button is running using a macro... How would I go about running a loop based on a value in a text box?

No, Unfortunately this is a little too complex for me. I am now using a duplicate button, with the serial number now changed to auto number. so just need to get over the duplicate 'X' amount of times with a click of a button. As said in my last thread, it would be great to have a message box...

Thanks for your reply Uncle Gizmo, I need to generate duplicates of the same record, and sometimes this could be up to 100 times... This is just a way to get round my last post: "Creating Multiple Records using button and text box to say how many to create" I have changed the serial number to...

Hi All, Is there any way to press a command button a certain amount of times based on a value in a text box. i.e. text box value = 5 button gets pressed 5 times with one click Thanks Symon

So I have had a look at this and it seems to be stuck on user defined type not defined - Dim rs As ADODB.Recordset - but i cant seem to find the right reference to enable to get this to work.. here's the code so far with help from Shoji Private Sub CreateButton_Click() Dim rs As...

Thanks Shoji, I'll have a play with this and see where I get to.

There are others too... but due to the way our companies procedures work and the way people log information etc I have created separate forms for these so I would apply the VBA to each form. Thanks

Hi all, I am looking for a way to enable a user to fill in a number of fields on a form press a button(CreateButton) and duplicate the records how ever many times is stated in a text box(TxtQty). I also need this to increase the serial number by the amount of times stated in the text box...