Results 1 to 15 of 15
  1. #1
    Gold Lounger
    Join Date
    Jan 2004
    Location
    Italy
    Posts
    3,245
    Thanks
    0
    Thanked 0 Times in 0 Posts

    ARE YOU READY? NEW ADVENTURE IN MY PROJECT! (2000)

    Many problem...

    1) problem
    In this database are present in userform1 4 list box (RICERCHE: Seleziona il criterio

    GENERE
    ATTORE
    ATTRICE
    REGISTA

    my problem is to eleimiate in the list box the line blank from every list when i press
    the arrow ( idont know because apper a blank line in the list after the last line visible)

    2) problem
    When i cliCk on a list box (RICERCHE: Seleziona il criterio for example ATTORE
    the text is populate with many line my poroblem is colorize the line that appear
    in alternate color

    3) problem
    When thext box (RICERCHE: Seleziona il criterio) is populate from many line record
    my problem is to populate a new user form (i.e. userform2) whit all data from the
    line clicked in this

  2. #2
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: ARE YOU READY? NEW ADVENTURE IN MY PROJECT! (2000)

    About problem 1: in the procedure Listabox, you set the RowSource of the combo boxes to a fixed range, not taking into account how many cells are filled. Change Listabox as follows:

    Sub Listabox()
    ComboBox1.RowSource = Foglio2.Range(Foglio2.Range("A2"), Foglio2.Range("A65536").End(xlUp)).Address(Externa l:=True)
    ComboBox2.RowSource = Foglio2.Range(Foglio2.Range("B2"), Foglio2.Range("B65536").End(xlUp)).Address(Externa l:=True)
    ComboBox3.RowSource = Foglio2.Range(Foglio2.Range("C2"), Foglio2.Range("C65536").End(xlUp)).Address(Externa l:=True)
    ComboBox4.RowSource = Foglio2.Range(Foglio2.Range("D2"), Foglio2.Range("D65536").End(xlUp)).Address(Externa l:=True)
    End Sub

  3. #3
    Gold Lounger
    Join Date
    Jan 2004
    Location
    Italy
    Posts
    3,245
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: ARE YOU READY? NEW ADVENTURE IN MY PROJECT! (2000)

    Tks for the speedy.
    In the WorkDay i work and you?
    :-)

  4. #4
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: ARE YOU READY? NEW ADVENTURE IN MY PROJECT! (2000)

    I think 2) is very difficult - it would involve using Windows API functions.

    For 3) it would be best if you included CODICE_FILM in the list box (ListBox1). It can be in a hidden column (column width = 0). Including CODICE_FILM will allow you to look up the other data for the film and populate UserForm2.

  5. #5
    Gold Lounger
    Join Date
    Jan 2004
    Location
    Italy
    Posts
    3,245
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: ARE YOU READY? NEW ADVENTURE IN MY PROJECT! (2000)

    For 3)
    it would be best if you included CODICE_FILM in the list box (ListBox1). It can be in a hidden column (column width = 0). Including CODICE_FILM will allow you to look up the other data for the film and populate UserForm2.



    Tks, but i have very, very difficult to make your modify !
    do you like to post a new code or re-attache my file with your correction.
    Tks.
    And good WorkingDay.

  6. #6
    Gold Lounger
    Join Date
    Jan 2004
    Location
    Italy
    Posts
    3,245
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: ARE YOU READY? NEW ADVENTURE IN MY PROJECT! (2000)

    see my post nr. Post: 368340
    similar prob in this project
    op. seleziona nell'elenco:
    same problem in the list box (op. seleziona nell'elenco to eliminate a blank line...

  7. #7
    WS Lounge VIP sdckapr's Avatar
    Join Date
    Jul 2002
    Location
    Pittsburgh, Pennsylvania, USA
    Posts
    11,225
    Thanks
    14
    Thanked 342 Times in 335 Posts

    Re: ARE YOU READY? NEW ADVENTURE IN MY PROJECT! (2000)

    Doesn't <post#=368639>post 368639</post#> answer the questions on the blanks?

    Steve

  8. #8
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: ARE YOU READY? NEW ADVENTURE IN MY PROJECT! (2000)

    Here is a version of your spreadsheet with revised code. I added Option Explicit to the modules and explicitly declared all variables.

    You can now double-click a film in the list box to open UserForm2.

  9. #9
    Gold Lounger
    Join Date
    Jan 2004
    Location
    Italy
    Posts
    3,245
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: ARE YOU READY? NEW ADVENTURE IN MY PROJECT! (2000)

    ... perhaps are you a WIZARD? It work fantastic!!!!!!!!!!!!!!!!!!!!!
    Cup of caffe are reserved for you! Come bak to Napoli....

  10. #10
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: ARE YOU READY? NEW ADVENTURE IN MY PROJECT! (2000)

    I'm glad you like it. Maybe we should come to Napoli as a group (Steve, Reimer, I, ...) <img src=/S/smile.gif border=0 alt=smile width=15 height=15>

  11. #11
    Gold Lounger
    Join Date
    Jan 2004
    Location
    Italy
    Posts
    3,245
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: ARE YOU READY? NEW ADVENTURE IN MY PROJECT! (2000)

    No problem.
    OK! I will be happy for accommodating in my city, also for one pizza!
    I am 49 old year, and i work approximately 2 years in the project programming area in a little farm. Before i am an Administrative.
    here why of my questions. my boss is a little too much questions one...
    Sorry for my english i translate from the web...

  12. #12
    Gold Lounger
    Join Date
    Jan 2004
    Location
    Italy
    Posts
    3,245
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: ARE YOU READY? NEW ADVENTURE IN MY PROJECT! (2000)

    my dear,
    i have downloaded, from a excel site, this (see attachemnt) and i tell you which is
    more just to menage this wbook? In effects this wbook contain many number of customer
    and i could make an archive with one o that script...
    Have you an idea from this script is a just way or in the your knoledge you know some
    other already ready solution for free dowanload.
    Tks
    For this question 2 cups of caffe and 2 pizzas for entire Group:-)

  13. #13
    Gold Lounger
    Join Date
    Jan 2004
    Location
    Italy
    Posts
    3,245
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: ARE YOU READY? NEW ADVENTURE IN MY PROJECT! (2000)

    2 ATTACHENET

  14. #14
    Gold Lounger
    Join Date
    Jan 2004
    Location
    Italy
    Posts
    3,245
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: ARE YOU READY? NEW ADVENTURE IN MY PROJECT! (2000)

    3 ATTACHEMENT

  15. #15
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: ARE YOU READY? NEW ADVENTURE IN MY PROJECT! (2000)

    Hi Salvatore,

    The first attachment seems to have a very different purpose than the second and third one. Moreover, the first attachment (PRATICHE_LEGALE.xls) contains no VBA code, so the command buttons on the worksheets don't do anything. Also, I don't know Italian.

    I'm afraid I can't offer any advice here. Sorry.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •