Posts by CJamesUK

    Check this

    Thats works perfect thank you

    Everyone has to learn, my comments were only meant to be helpful.

    Post back if you aren't sure about what I have changed.

    Hi Roy,

    Only just got round to having a look at this again as im picking it up in between my normal workload.

    Again thanks for helping out with this.

    So a couple of things as what you have changed im having a bit of trouble understanding.

    The amount is now in the next column as asked but when you add another item and amount the item lists below as required but the amount just stays with the first item and just changes it.

    Also id like to get the whole line of text from above not just the first item.

    so ive had no VBA training im learning as i go along, this is a brand new sheet ive been working on.

    Ok the jist of what im trying to achieve at this point form PickForm

    I want to be able to select a type of ironmongery from the combobox which then gives me all the options in the listbox underneath when you click on an item it will bring up a picture, in the amount box i want to be able to enter the amount of this item that i need which then will transfer down to the bottom list box which will become my pick list that i will send to a sheet within excel.

    id like the bottom box to look like this

    Product Code Description Per Unit Price Supplier Amount

    As ive said im totally new to this kinda stuff so other parts of what im doing maybe wrong but it all seems to work so far.

    newbie to vba im having trouble with listboxs and populating them with the info i need in the correct format.

    So i already have 1 listbox (lstResults) which the information in it is taken from a selected item from a combobox (cboxType)

    from lstResults i click an item and them in a separate textbox i want to add an amount eg 10 then with a commandbutton add the lstResults information and textbox amount to another listbox in different columns in the same row and then be able to add more with more selections.

    ive nearly got it working but it just over writes the last entry.

    Hi All,

    Be gentle newbie here! and to VBA

    Im trying to get the combox value to point to a worksheet where the text in the user form can be sent.

    Any help would be greatful

    RowCount = Worksheets("cboxProductType.value").Range("a1").CurrentRegion.Rows.Count

    With Worksheets("cboxProductType.value").Range("a1")

    .Offset(RowCount, 1) = txtProduct.Value

    .Offset(RowCount, 2) = txtDescription.Value

    .Offset(RowCount, 3) = txtPerUnit.Value

    .Offset(RowCount, 6) = txtPrice.Value

    .Offset(RowCount, 7) = cboxSupplier.Value