Macro Buttons for Editing and Adding Inventory

Hi Philrulesw

Looks like you are very competent at code so Jack has a good example here at J & R Database Form...

let us know if have any problems or it dosent suit your needs

Hi Phil

Did you have issues with the file attached to my post #16?

Ok have a look and then we can adjust to suit

Hi Phil

Welcome to the Forum!

I've looked at your Thread, attached file and your defined requirements for well over an hour trying to get an understanding of just what your looking for.
The example that Pike has suggested I've used many times successfully (with modification of course...to meet user needs) and perhaps it'll fit your needs...don't know yet.

What you're suggesting is Dependant ComboBoxes...Select Brand Name which will bring up a list of Instrument Types...select an Instrument Type and it'll bring up a list of Model Numbers (or what ever sequence)

One of the elements you speak about you've not provided

I would like to be able to select the brand names, and then the ComboBox for the models would only show the select models associated with the brand name listed

I'd like you to develop a worksheet that lists Brand Name, Instrument Type and Model Number (or whatever sequence you choose). I've some ideas on this...may be totally crap...who knows.

Hi Phil...I don't doubt this for a moment

when you enter a NEW ITEM with the macro button, it doesn't put it into the INVENTORY list in the correct order

I've had about 8 different versions (kept breaking on me...knew what I wanted to do but couldn't keep Excel alive). So, I'll look at that. Let me know of other issues. Get back to you.

Hi Phil

I would love to work with someone to help me develop this inventory system.

Please show us what your inventory looks like (50 to 100 records...or the entire inventory if you so choose...I can work with that)...perhaps I can help.

Can't help with what I see.

Hi Phil
Must've had one beer too many. This issue

when you enter a NEW ITEM with the macro button, it doesn't put it into the INVENTORY list in the correct order

is created by these lines of code in the "CommandButtonCapturar_Click" code.

Change these lines of code from this

With Sheets("Inventory")
                            NR = .Range("A" & .Rows.Count).End(xlUp).Offset(1, 0).Row
                            .Range("A" & NR).Value = Me.Controls("Combobox" & i).Value
                            .Range("B" & NR).Value = Me.Controls("Combobox" & i + 6).Value
                            .Range("C" & NR).Value = Me.Controls("Combobox" & i + 11).Value
                            .Range("D" & NR).Value = Me.Controls("TextBox" & i).Value
                            .Range("E" & NR).Value = Me.Controls("CBcant" & i).Value
                        End With

to this

With Sheets("Inventory")
                            NR = .Range("A" & .Rows.Count).End(xlUp).Offset(1, 0).Row
                            .Range("A" & NR).Value = Me.Controls("Combobox" & i + 11).Value
                            .Range("B" & NR).Value = Me.Controls("Combobox" & i).Value
                            .Range("C" & NR).Value = Me.Controls("Combobox" & i + 6).Value
                            .Range("D" & NR).Value = Me.Controls("TextBox" & i).Value
                            .Range("E" & NR).Value = Me.Controls("CBcant" & i).Value
                        End With

Let me know of issues.

Hi Phil...I'll look at this tomorrow.

Hi Phil
Although the new version of Excel for the mac supports VBA, not all things are handled. The code I presented was developed on a mac but in Virtual Machine mode (PC mode). A Forum member who actively uses Excel for the mac would have to address this issue. Sorry.

Hi Phil...sorry I didn't get a chance to look at this today...lot's of Forum Issues today. I'll create a follow up for the AM.

Hi Phil...looking at it. Lot's of Forum issues the last couple of days...haven't given up on it.

Are Model Numbers UNIQUE to a Brand (manufacturer)?...to an Instrument TYPE?

Further, will you ALWAYS have a Model Number?

Hi Phil
There are several advanced Forum users that actively use the mac that will be able to address this new issue (I've a feeling they'll advise you it WON'T work but what do I know about VBA on the mac).
In any event, I'd advise you to start a new Thread for this issue being sure to reference mac in your Thread title. If you do so, I'd appreciate if you'd PM me with a link to that Tread...I'd like to follow it.

Hi Phil
That's fine...I've been through about 3 or 4 iterations of this thus far. Soon I'll decide which one works best for me and send it on for your perusal.

Hi Phil
It's called VMWare Fusion (Google it). It's what I use...'course, I'm lazy and don't want to learn the mac. But, that's all my children use so I need to 'sorta accommodate them.

Hi Phil
I was two minutes from sending you a file tonight but in those two minutes I was able to break it...and it's a significant issue (crashes Excel). So, it'll be a bit. Need to do some thinking and a small bit of redesign. The sad part...don't even know if what I have suits your need. Ah well, if I can get it working I guess we'll find out. Back to you when I have something that's stable.

Hi Phil

Well, did a complete redesign. Haven't been able to break this design for the last 2-3 hours. Again, not sure this is what you're looking for.

Here's how it works:

1. I've added a dynamic Named Range to the Info Sheet called "Brand". One CANNOT ADD to this list with the procedures. If you have a new Brand simply add it to the list in Info...sort the list if you so choose (or the sort can be built into the procedures...rather simple).
2. Having chosen a Brand, you'll be presented with a list of Instruments that currently exits for the chosen Brand. If the Instrument you're currently processing does NOT exist for the selected Brand simply type the Instrument Name in the ComboBox. If it DOES exist, click on the Instrument Name.
3. Having chosen an Instrument, you'll be presented with a list of Models that currently exist for that Instrument for that Brand. If the Model currently exists, simply select it. If it doesn't exist, type the new Model Number in the ComboBox.
   
   Play with it...let me know what you like...what you don't like. What works...what doesn't work. Let me know of issues.