Pagina 1 di 2 12 UltimaUltima
Risultati da 1 a 30 di 40

Discussione: Regioni italiane



  1. #1
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3345
    Versione Office
    2013 PC
    Likes ricevuti
    483
    Likes dati
    49

    Regioni italiane

    Ciao, riprendo la discussione fatta nel thread

    http://www.forumexcel.it/forum/6-dom...da-un-immagine

    in cui il buon Gerardo mi ha sfruculiato (come dicono a Napoli):

    ...fantastic!! anche se sarebbe bello (seguendo la logica della cartina dell'italia) una volta cliccato sulla regione vedersi comparire la cartina della regione suddivisa per provincie ...

    ebbene, visto che mi hai buttato l'esca, io l'ho inghiottita con tutto l'amo.

    Eccolo :

    Link per scaricare :
    https://www.dropbox.com/s/owl85457ht...alia.xlsm?dl=0

    P.S.
    La password è sempre 123

    PP.SS.
    Le province da cliccare per avere i comuni, sono quelle della colonna N
    Ultima modifica fatta da:ges; 06/03/16 alle 11:41 Motivo: Sistemato link per scaricare

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  2. I seguenti 6 utenti hanno dato un "Like" a Baloon_50 per questo post:


  3. #2
    L'avatar di Gerardo Zuccalà
    Clicca e Apri
    Data Registrazione
    May 2015
    Località
    Milano, Italy
    Età
    49
    Messaggi
    4916
    Versione Office
    2013
    Likes ricevuti
    1117
    Likes dati
    1126
    Svegliandomi alle ore 5:00 di mattina per andare a lavorare mi trovo l piacevole sorpresa della mappa interattiva italiana con le regioni e provincie che super fantastic!!
    grande baloon ma non dovevi...
    beh allora visto che ci sei seguendo una logica.... scherzo!!
    :18:

  4. #3
    L'avatar di rollis13
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Cordenons
    Messaggi
    820
    Versione Office
    2016 64bit
    Likes ricevuti
    148
    Likes dati
    55
    Ottimo impegno.:286:
    Ad essere pignoli manca la pulizia della colonna Comuni ad ogni cambio di provincia (rimangono i residui dei precedenti se ce ne sono tanti) ed esteticamente ci starebbe bene un Autofit sulle due colonne Province e Comuni :48:.

  5. #4

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Cosenza
    Età
    45
    Messaggi
    2814
    Versione Office
    Excel 2013
    Likes ricevuti
    1024
    Likes dati
    981
    Complimenti Baloon. Sempre sul pezzo.

    Mi sembra di aver trovato un bug:
    In Workbook_SheetBeforeDoubleClick

    Codice: 
    Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
    
    
    Dim wsh As Worksheet
    Dim uriga As Long
    Dim i As Integer, a As Integer
    Dim indirizzo As String
    
    
    Application.ScreenUpdating = False
    Set wsh = ThisWorkbook.Worksheets("Comuni")
    
    
    valore = ActiveSheet.Name
    uriga = wsh.Range("A" & Rows.Count).End(xlUp).Row
    a = 2
    indirizzo = ActiveCell.Address
    
    
    Sheets(valore).Range("O" & uriga).ClearContents ' CORREZIONE Range("O2:O" & uriga)
    
    
    For i = 2 To uriga
        If wsh.Range("B" & i).Value = Sheets(valore).Range(indirizzo).Value Then
            Range("O" & a).Value = wsh.Range("A" & i).Value
            a = a + 1
        End If
    Next
    Sheets(valore).Range("N1").Activate
    
    
    Set wsh = Nothing
    Application.ScreenUpdating = True
    
    
    End Sub
    Poi per essere pignoli uRiga la Dichiarerei una costante (visto che i comuni non cambiano)

  6. #5
    L'avatar di Marius44
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Catania
    Età
    73
    Messaggi
    3222
    Versione Office
    Excel2010
    Likes ricevuti
    628
    Likes dati
    155
    Ciao Gaetano

    complimenti! :255: Veramente un ottimo lavoro (anche se qualche "pignolo" :166: trova errori).

    Ciao a tutti,
    Mario

  7. #6
    L'avatar di Vincenzo Damiani
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Molfetta
    Età
    58
    Messaggi
    423
    Versione Office
    2010
    Likes ricevuti
    13
    Likes dati
    637
    Citazione Originariamente Scritto da Baloon_50 Visualizza Messaggio
    Ciao, riprendo la discussione fatta nel thread

    http://www.forumexcel.it/forum/6-dom...da-un-immagine

    in cui il buon Gerardo mi ha sfruculiato (come dicono a Napoli):

    ...fantastic!! anche se sarebbe bello (seguendo la logica della cartina dell'italia) una volta cliccato sulla regione vedersi comparire la cartina della regione suddivisa per provincie ...

    ebbene, visto che mi hai buttato l'esca, io l'ho inghiottita con tutto l'amo.

    Eccolo :

    https://www.dropbox.com/s/owl85457ht73yec/Italia.xlsm?dl=0

    P.S.
    La password è sempre 123

    PP.SS.
    Le province da cliccare per avere i comuni, sono quelle della colonna N
    Ciao Baloon,
    Ma dov'è finito il tuo capolavoro?
    non riesco a scaricarlo...
    Windows8.1 office 2010

  8. #7

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7165
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2065
    Likes dati
    1304
    Complimenti per l'ottimo lavoro Baloon, (purtroppo non riesco a darti un "mi piace" poichè dopo aver modificato il tuo messaggio sistemando il link per scaricare mi è sparita l'icona).

    Ci sarebbero due cose che secondo me farebbero un lavoro perfetto:

    1) la prima estetica, cioè avere una carta geografica tridimensionale o come quella cha ha postato Cromagno della Sardegna;

    2) La seconda - la più importante - funzionale, cioè dopo che compare l'immagine di ciascuna provincia cliccare sulla province della stessa immagine per avere i comuni.

    Comunque sono delle pignolerie, il lavoro cha hai fatto resta un capolavoro!
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  9. #8
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3345
    Versione Office
    2013 PC
    Likes ricevuti
    483
    Likes dati
    49
    per :
    Vincenzo : il link è questo . https://www.dropbox.com/s/owl85457ht...alia.xlsm?dl=0
    Rollis : se non c'è la pulizia della colonna comuni molto probabilmente è dovuta all'errore che mi ha evidenziato Rubik
    Mario : grazie per i complimenti, i "pignoii" ci sono sempre :243: e comunque ben vengano sono quelli che ti aiutano a migliorare il lavoro
    Ges : purtroppo la cartina ho cercato di trovarla simile per tutte le regioni e su internet di tridimensionali ne ho trovate solo alcune; per quanto riguarda il cliccare sulla provincia della mappa era il mio sogno ma qualcuno deve aiutarmi perchè le mie conoscenze non mi permettono di salvare in una costante il valore della casella di testo; per il mi piace non devi preoccuparti non ci sono premi a chi arriva primo il premio, per quel che mi riguarda, sono i complimenti
    Gerardo : grazie della dritta e seguendo una logica..... :261:

    Un grazie a tutti voi.

    P.S.
    Per il momento non lo segno [RISOLTO] perchè magari qualcuno mi darà la dritta per quanto riguarda il clic sulle province.

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  10. #9
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3345
    Versione Office
    2013 PC
    Likes ricevuti
    483
    Likes dati
    49
    Trovata la risposta al mio quesito.
    Datemi tempo e vi solleverò il mondo (o no!!??!!??!) :243:

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  11. #10
    L'avatar di Vincenzo Damiani
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Molfetta
    Età
    58
    Messaggi
    423
    Versione Office
    2010
    Likes ricevuti
    13
    Likes dati
    637
    Citazione Originariamente Scritto da Baloon_50 Visualizza Messaggio
    per :
    Vincenzo : il link è questo . https://www.dropbox.com/s/owl85457ht...alia.xlsm?dl=0
    Rollis : se non c'è la pulizia della colonna comuni molto probabilmente è dovuta all'errore che mi ha evidenziato Rubik
    Mario : grazie per i complimenti, i "pignoii" ci sono sempre :243: e comunque ben vengano sono quelli che ti aiutano a migliorare il lavoro
    Ges : purtroppo la cartina ho cercato di trovarla simile per tutte le regioni e su internet di tridimensionali ne ho trovate solo alcune; per quanto riguarda il cliccare sulla provincia della mappa era il mio sogno ma qualcuno deve aiutarmi perchè le mie conoscenze non mi permettono di salvare in una costante il valore della casella di testo; per il mi piace non devi preoccuparti non ci sono premi a chi arriva primo il premio, per quel che mi riguarda, sono i complimenti
    Gerardo : grazie della dritta e seguendo una logica..... :261:

    Un grazie a tutti voi.

    P.S.
    Per il momento non lo segno [RISOLTO] perchè magari qualcuno mi darà la dritta per quanto riguarda il clic sulle province.
    Grazie Baloon
    Windows8.1 office 2010

  12. #11
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3345
    Versione Office
    2013 PC
    Likes ricevuti
    483
    Likes dati
    49
    Citazione Originariamente Scritto da Vincenzo Damiani Visualizza Messaggio
    Grazie Baloon
    prego. :242:

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  13. I seguenti utenti hanno dato un "Like"


  14. #12
    L'avatar di robynud
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Gardone Val Trompia
    Età
    45
    Messaggi
    155
    Versione Office
    Office 2016
    Likes ricevuti
    24
    Likes dati
    65
    grande baloon :285: un piccolo aiuto se permetti posso dartelo io,ti ho scomposto le regioni in sigoli pezzi

    Download File da DropBox

  15. I seguenti utenti hanno dato un "Like"


  16. #13
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3345
    Versione Office
    2013 PC
    Likes ricevuti
    483
    Likes dati
    49
    Citazione Originariamente Scritto da robynud Visualizza Messaggio
    grande baloon :285: un piccolo aiuto se permetti posso dartelo io,ti ho scomposto le regioni in sigoli pezzi

    Download File da DropBox
    Grazie Robynud ma tu hai usato il file vecchio?
    Prova a scaricarti il nuovo e se proprio vuoi essermi d'aiuto (grazie tantissimo) dovresti dividermi le province in singoli pezzi perchè sto cercando di cliccare sulla provincia per ottenere i comuni. Io sono partito dal nord eventualmente tu parti dal sud e isole :261: e grazie ancora.

    https://www.dropbox.com/s/owl85457ht...alia.xlsm?dl=0

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  17. #14
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3345
    Versione Office
    2013 PC
    Likes ricevuti
    483
    Likes dati
    49
    Citazione Originariamente Scritto da Baloon_50 Visualizza Messaggio
    Grazie Robynud ma tu hai usato il file vecchio?
    Prova a scaricarti il nuovo e se proprio vuoi essermi d'aiuto (grazie tantissimo) dovresti dividermi le province in singoli pezzi perchè sto cercando di cliccare sulla provincia per ottenere i comuni. Io sono partito dal nord eventualmente tu parti dal sud e isole :261: e grazie ancora.

    https://www.dropbox.com/s/owl85457ht...alia.xlsm?dl=0

    Purtroppo il lavoro è molto ma molto lungo e poi ci sono problemi con le province piccoline in quanto non si riesce a fare il clic perchè il riquadro si sovrappone agli altri.
    Rubynud se hai cominciato a fare il lavoro forse sarebbe il caso di fermarti. Io ci rinuncio.

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  18. #15
    L'avatar di totorom1
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Varapodio
    Messaggi
    41
    Versione Office
    Excel 2007
    Likes ricevuti
    1
    Complimenti, ottimo lavoro.

  19. #16
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3345
    Versione Office
    2013 PC
    Likes ricevuti
    483
    Likes dati
    49
    Citazione Originariamente Scritto da totorom1 Visualizza Messaggio
    Complimenti, ottimo lavoro.
    Grazie totorom :242:

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  20. #17
    L'avatar di robynud
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Gardone Val Trompia
    Età
    45
    Messaggi
    155
    Versione Office
    Office 2016
    Likes ricevuti
    24
    Likes dati
    65
    avevo notato anche io, pero secondo me bisogna metterci i nomi delle province per cliccarci su come ho fatto io, comunque per adesso ho avuto solo 5 minuti di tempo e ho iniziato dalla sicilia dagli uno sguardo se va bene :43:

    Download File da DropBox

  21. #18
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3345
    Versione Office
    2013 PC
    Likes ricevuti
    483
    Likes dati
    49
    Citazione Originariamente Scritto da robynud Visualizza Messaggio
    avevo notato anche io, pero secondo me bisogna metterci i nomi delle province per cliccarci su come ho fatto io, comunque per adesso ho avuto solo 5 minuti di tempo e ho iniziato dalla sicilia dagli uno sguardo se va bene :43:

    Download File da DropBox
    il file è stato tolto (errore 404)

    ciao.

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  22. #19
    L'avatar di Gianfranco55
    Clicca e Apri
    Data Registrazione
    Nov 2015
    Località
    Vicenza
    Età
    62
    Messaggi
    2076
    Versione Office
    2016
    Likes ricevuti
    553
    Likes dati
    117
    Ciao Baloon
    Visto il file ho aggiunto qualche dato e
    (se possibile) migliorata la grafica delle cartine
    ora con il tuo permesso vorrei aggiungere la ricerca del comune
    partendo da un numero telefonico

    ciao

    NB
    il codice di cancellazione colonne si poteva restringere ad una sola stringa
    ma è volutamente utilizzato colonna per colonna :227:

    per le province questa sera con calma mi metto anch'io all'opera
    vorrei provare inserendo un puntino rosso sopra
    il nome e al click si popolano le colonne.
    un lavoro di pazienza

  23. I seguenti 2 utenti hanno dato un "Like" a Gianfranco55 per questo post:


  24. #20
    L'avatar di robynud
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Gardone Val Trompia
    Età
    45
    Messaggi
    155
    Versione Office
    Office 2016
    Likes ricevuti
    24
    Likes dati
    65
    Ciao Baloon, ok adesso lo rimesso adesso c'è la sicilia e la calabria, e ho risolto anche il problema delle regioni cliccabili :167:, adesso vedrai che passando il mouse sopra il colere di una provincia si attivera solo che delimita la provincia e non le parti trasparenti, ho messo dei collegamenti finti che vedrai al passaggio del mouse che indicano quando sei in una provincia rispetto ad un altra.

    https://www.youtube.com/edit?o=U&video_id=9vcPGxfF-OU

    Dimmi se va bene che continuo :176: per me cosi e molto piu veloce da fare

    Download File da DropBox

  25. I seguenti 2 utenti hanno dato un "Like" a robynud per questo post:


  26. #21
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3345
    Versione Office
    2013 PC
    Likes ricevuti
    483
    Likes dati
    49
    Citazione Originariamente Scritto da robynud Visualizza Messaggio
    Ciao Baloon, ok adesso lo rimesso adesso c'è la sicilia e la calabria, e ho risolto anche il problema delle regioni cliccabili :167:, adesso vedrai che passando il mouse sopra il colere di una provincia si attivera solo che delimita la provincia e non le parti trasparenti, ho messo dei collegamenti finti che vedrai al passaggio del mouse che indicano quando sei in una provincia rispetto ad un altra.

    https://www.youtube.com/edit?o=U&video_id=9vcPGxfF-OU

    Dimmi se va bene che continuo :176: per me cosi e molto piu veloce da fare

    Download File da DropBox
    Grande robynud vai pure avanti poi però mi devi dire perchè a me quando clicco su una citta (sicilia o calabria) mi dice riferimento non valido

    Grande Grande

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  27. #22
    L'avatar di robynud
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Gardone Val Trompia
    Età
    45
    Messaggi
    155
    Versione Office
    Office 2016
    Likes ricevuti
    24
    Likes dati
    65
    ciao baloon, appunto ho scritto che ho messo dei Collegamenti "finti" solo per farti vedere come funzionano, non riesco ad adattare il codice da mettere al posto del collegamento, cosi da poter avviare l'evento che si scatena come quando clicco sulle celle delle province in colonna"N" :236:

  28. #23
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3345
    Versione Office
    2013 PC
    Likes ricevuti
    483
    Likes dati
    49
    Citazione Originariamente Scritto da robynud Visualizza Messaggio
    ciao baloon, appunto ho scritto che ho messo dei Collegamenti "finti" solo per farti vedere come funzionano, non riesco ad adattare il codice da mettere al posto del collegamento, cosi da poter avviare l'evento che si scatena come quando clicco sulle celle delle province in colonna"N" :236:
    OK robynud ho sistemato le province di sicilia e calabria mettendo un pallino vicino ad ogni provincia (grazie Gianfranco ho preso spunto da quanto hai scritto).
    Adesso aspetto le altre regioni così proseguo con le macro da associare.

    Grazie ancora e attendo fiducioso.

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  29. I seguenti utenti hanno dato un "Like"


  30. #24
    L'avatar di robynud
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Gardone Val Trompia
    Età
    45
    Messaggi
    155
    Versione Office
    Office 2016
    Likes ricevuti
    24
    Likes dati
    65
    ciao baloon, allora per quando riguarda i pallini penso che non servano se tu associ le macro al testo e alle province singolarmente togliendo il collegamento, :62: sperrando di aver capito quello che vuoi fare con i pallini, adesso sono fuori casa domani in giornata ti mando sia la basilicata che la puglia :167:

  31. #25
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3345
    Versione Office
    2013 PC
    Likes ricevuti
    483
    Likes dati
    49
    Citazione Originariamente Scritto da robynud Visualizza Messaggio
    ciao baloon, allora per quando riguarda i pallini penso che non servano se tu associ le macro al testo e alle province singolarmente togliendo il collegamento, :62: sperrando di aver capito quello che vuoi fare con i pallini, adesso sono fuori casa domani in giornata ti mando sia la basilicata che la puglia :167:
    Ok Attendo fiducioso.
    per quanto riguarda l'associazione al testo, ci sono province piccolissime vedi piemonte, friuli, toscana ... dove i nomi si accavallano e comunque mi è più facile associare un'immagine (il pallino) che non una casella di testo. Comunque non preoccuparti per i pallini me la vedo io, tu metti solo i nomi delle province come hai fatto per sicilia e calabria.


    Grazie ancora.
    Buonanotte

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  32. I seguenti utenti hanno dato un "Like"


  33. #26
    L'avatar di robynud
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Gardone Val Trompia
    Età
    45
    Messaggi
    155
    Versione Office
    Office 2016
    Likes ricevuti
    24
    Likes dati
    65
    rieccomi, allora c'è tutto il sud compreso isole, ho sistemato i collegamenti, che non andavano adesso se ci clicchi ti seleziona la cella col nome della provincia, prova a dare un occhiata anche alla cartina principale, ho associato le macro anche alle zone delle Regioni che ho modificato cosi che le regioni nel selezionarli non si accavallano (prova a passare il mouse e a cliccarci). appena riesco faccio anche le altre reggioni

    Download Regioni Italiane

  34. #27
    L'avatar di Marius44
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Catania
    Età
    73
    Messaggi
    3222
    Versione Office
    Excel2010
    Likes ricevuti
    628
    Likes dati
    155
    Come ho già avuto modo di dire a Baloon debbo ripetermi per Robynud: Complimenti, veramente bravi.
    Vorrei dare il mio contributo.
    Se per i nomi delle province si utilizzato delle Caselle di Testo e ad ognuna si associa la macro che posto appresso, si ottiene l'immediata scrittura dei comuni relativi alla provincia cliccata.
    La macro è SOLO per Catania (ovviamente)

    Codice: 
    Sub Catania()
    Set wsh = ThisWorkbook.Worksheets("Comuni")
    city = "Catania"
    valore = ActiveSheet.Name
    uriga = wsh.Range("A" & Rows.Count).End(xlUp).Row
    a = 2
    cella = Application.WorksheetFunction.Match(city, Range("N1:N10"), 0)
    Cells(cella, 14).Select
    indirizzo = ActiveCell.Address
    
    
    Sheets(valore).Range("O2:O" & uriga).ClearContents
    
    
    For i = 2 To uriga
        If wsh.Range("B" & i).Value = Sheets(valore).Range(indirizzo).Value Then
            Range("O" & a).Value = wsh.Range("A" & i).Value
            a = a + 1
        End If
    Next
    Sheets(valore).Range("N1").Activate
    
    
    Set wsh = Nothing
    End Sub
    Non mancherà a voi adattarla per tutte le province. Potrebbe andare?

    Ciao,
    Mario

  35. I seguenti utenti hanno dato un "Like"


  36. #28
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3345
    Versione Office
    2013 PC
    Likes ricevuti
    483
    Likes dati
    49
    Citazione Originariamente Scritto da Marius44 Visualizza Messaggio
    Come ho già avuto modo di dire a Baloon debbo ripetermi per Robynud: Complimenti, veramente bravi.
    Vorrei dare il mio contributo.
    Se per i nomi delle province si utilizzato delle Caselle di Testo e ad ognuna si associa la macro che posto appresso, si ottiene l'immediata scrittura dei comuni relativi alla provincia cliccata.
    La macro è SOLO per Catania (ovviamente)

    Codice: 
    Sub Catania()
    Set wsh = ThisWorkbook.Worksheets("Comuni")
    city = "Catania"
    valore = ActiveSheet.Name
    uriga = wsh.Range("A" & Rows.Count).End(xlUp).Row
    a = 2
    cella = Application.WorksheetFunction.Match(city, Range("N1:N10"), 0)
    Cells(cella, 14).Select
    indirizzo = ActiveCell.Address
    
    
    Sheets(valore).Range("O2:O" & uriga).ClearContents
    
    
    For i = 2 To uriga
        If wsh.Range("B" & i).Value = Sheets(valore).Range(indirizzo).Value Then
            Range("O" & a).Value = wsh.Range("A" & i).Value
            a = a + 1
        End If
    Next
    Sheets(valore).Range("N1").Activate
    
    
    Set wsh = Nothing
    End Sub
    Non mancherà a voi adattarla per tutte le province. Potrebbe andare?

    Ciao,
    Mario
    Ciao Mario d'accordo ma io volevo evitare di scrivere una routine sempre identica per ogni città per questo utilizzo il pallino perchè in base a quello che clicco, con una select case ci metto dentro la città e quindi eseguo una sola routine di acquisizione dei comuni.

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

  37. #29
    L'avatar di Marius44
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Catania
    Età
    73
    Messaggi
    3222
    Versione Office
    Excel2010
    Likes ricevuti
    628
    Likes dati
    155
    Ciao Baloon
    Hai ragione sarebbe un lavoro molto lungo e certosino, anche se si poteva far prendere il nome dalla Casella di Testo e poi rimandare alla Routine-unica che è sempre quella.
    Ciao,
    Mario

  38. #30
    L'avatar di Baloon_50
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Milano - Italy
    Età
    67
    Messaggi
    3345
    Versione Office
    2013 PC
    Likes ricevuti
    483
    Likes dati
    49
    Citazione Originariamente Scritto da Marius44 Visualizza Messaggio
    Ciao Baloon
    Hai ragione sarebbe un lavoro molto lungo e certosino, anche se si poteva far prendere il nome dalla Casella di Testo e poi rimandare alla Routine-unica che è sempre quella.
    Ciao,
    Mario
    Per un giorno e mezzo ho cercato su internet per capire come si salva in una variabile il valore di una casella di testo

    A volte basta usare parole inutili come “grazie” e “per favore” per rendere la vita più bella.
    (ELKonigsburg)
    Dice il saggio : "se vuoi essere aiutato devi metter l'allegato"
    (Nick Carter - Ten)

Discussioni Simili

  1. [Risolto] come separare caratteri cinese da parole italiane?
    Di maxcarati nel forum Domande su Excel in generale
    Risposte: 15
    Ultimo Messaggio: 14/10/16, 11:59
  2. Aggiungere tassa Fissa Poste Italiane
    Di A.Maurizio nel forum Domande su Excel VBA e MACRO
    Risposte: 8
    Ultimo Messaggio: 22/02/16, 19:28

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •