È soltanto un Pokémon con le armi o è un qualcosa di più? Vieni a parlarne su Award & Oscar!
 
Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

funzione visible

Ultimo Aggiornamento: 29/07/2016 22:01
Post: 64
Registrato il: 01/04/2016
Città: MILANO
Età: 22
Utente Junior
2003
OFFLINE
28/07/2016 11:15

Buongiorno a tutti, 
sto cercando di scrivere una macro con funzione visible ma mi da errore con:
"Routine troppo grande"
c'è possibilita di risolvere questo problema?
Di seguito allego piccolo esempio:

viste le condizioni uguali, è possibile riassumerle?
Ringrazio chi ha tempo da dedicarmi.







If UserForm3.ComboBox2 = "FIXFIN_S" Then ' elimina le voci che non interessano tale tipologia

     UserForm3.Label7.Visible = False

     UserForm3.ComboBox15.Visible = False

     UserForm3.Label8.Visible = False

     UserForm3.ComboBox16.Visible = False

     UserForm3.Label18.Visible = False

     UserForm3.ComboBox21.Visible = False

     UserForm3.Label19.Visible = True

     UserForm3.ComboBox22.Visible = True

     UserForm3.Frame3.Visible = False

     UserForm3.Frame5.Visible = False

End If

 

If UserForm3.ComboBox2 = "FIXPOR_S" Then ' elimina le voci che non interessano tale tipologia

     UserForm3.Label7.Visible = False

     UserForm3.ComboBox15.Visible = False

     UserForm3.Label8.Visible = False

     UserForm3.ComboBox16.Visible = False

     UserForm3.Label18.Visible = True

     UserForm3.ComboBox21.Visible = True

     UserForm3.Label19.Visible = True

     UserForm3.ComboBox22.Visible = True

     UserForm3.Frame3.Visible = True

     UserForm3.Frame5.Visible = False

End If


Post: 3.287
Registrato il: 13/03/2012
Città: LIVORNO
Età: 78
Utente Master
2010
OFFLINE
28/07/2016 11:42

allega il file

----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
Post: 64
Registrato il: 01/04/2016
Città: MILANO
Età: 22
Utente Junior
2003
OFFLINE
28/07/2016 12:28

dovrei allegare tutto il programma che ho fatto!!!!!

Post: 3.289
Registrato il: 13/03/2012
Città: LIVORNO
Età: 78
Utente Master
2010
OFFLINE
28/07/2016 12:38

quello che serve per testare la tua userform

----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
Post: 65
Registrato il: 01/04/2016
Città: MILANO
Età: 22
Utente Junior
2003
OFFLINE
28/07/2016 13:00

eeeee........
non so proprio come fare, per allegare solo la parteda me richiesta....
non riesci a darmi una soluzione solo vedendo la funzione?
Post: 3.290
Registrato il: 13/03/2012
Città: LIVORNO
Età: 78
Utente Master
2010
OFFLINE
28/07/2016 13:17

ti giro la domanda, tu ci riusciresti senza fare delle prove ? chi risponde sul forum non è un professionista (che ha altro da fare) ma un utente come te, forse più esperto, ma che non ha la bacchetta magica.

----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
Post: 66
Registrato il: 01/04/2016
Città: MILANO
Età: 22
Utente Junior
2003
OFFLINE
28/07/2016 16:08


ciao, capisco benissimo, ma essendo ormai un programma del tutto completo, e dopo averci lavorato per estenuanti mesi, se permetti, non voglio metterlo a disposizione di altri, e comunque non riesco a girartelo in parte, essendo le combobox concatenate, pertanto, se ometto qualcosa, comunque non ti funziona.
con questo non volgioassolutamente essere definita egoista, pero'.........


Post: 2.114
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Veteran
Excel 365
OFFLINE
28/07/2016 16:17

Donatella mi sa allora che il problema dovrai risolvertelo da sola.

Alfredo
Post: 67
Registrato il: 01/04/2016
Città: MILANO
Età: 22
Utente Junior
2003
OFFLINE
28/07/2016 16:18

so che non è semplice, ma chiedo aiuto
Post: 2.117
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Veteran
Excel 365
OFFLINE
28/07/2016 16:39

Oltre che non è semplice a mio modo di vedere è pressochè impossibile.

Qui nessuno ti vuole rubare niente ma chi volesse risponderti mi dici perchè dovrebbe ricostruirsi da solo il tuo file con la quasi certezza di non riuscirvi?

Alfredo
Post: 68
Registrato il: 01/04/2016
Città: MILANO
Età: 22
Utente Junior
2003
OFFLINE
28/07/2016 16:57

francamente, pesavo, che solo guardando le seguentI funzioni, fosse possibile associare almeno i nomi:"FIXFIN_S""FIXPOR_S" visto che le label e le combobox sono uguali???


If UserForm3.ComboBox2 = "FIXFIN_S" Then

     UserForm3.Label7.Visible = False

      UserForm3.ComboBox15.Visible = False

  etc...

End If

If UserForm3.ComboBox2 = "FIXPOR_S" Then

     UserForm3.Label7.Visible = False

      UserForm3.ComboBox15.Visible = False

      UserForm3.Label8.Visible = False

   etc.....

End If

 




Post: 3.291
Registrato il: 13/03/2012
Città: LIVORNO
Età: 78
Utente Master
2010
OFFLINE
28/07/2016 18:12

se tu sei stata capace di fare un programma complesso significa che non sei alle prime armi, quindi sei in grado di capire, non mi hai risposto alla domanda, tu saresti capace di trovare il difetto senza fare un test ?
Il problema è tuo, se non sai come risolverlo allega il file altrimenti noi sopravviveremo bene anche senza

[Modificato da patel45 28/07/2016 18:13]

----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
Post: 1.940
Registrato il: 27/07/2010
Utente Veteran
OFFLINE
28/07/2016 19:00

Re:
donatella2016, 28/07/2016 16.08:


......e dopo averci lavorato per estenuanti mesi, se permetti, non voglio metterlo a disposizione di altri.........





Cioè, fammi capire, gli altri dovrebbero mettere a tua disposizione le loro conoscenze, ma tu non vuoi condividere le tue?
Questa tua posiizone mi sembra del tutto contraria allo spirito di questo e di altri forum.



Bye!
scossa

scossa's web site
___
Se tu hai una mela, e io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno. Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)
Post: 3.512
Registrato il: 04/07/2012
Città: BARCELLONA POZZO DI GOTTO
Età: 61
Utente Master
2010
OFFLINE
28/07/2016 19:19

ciao
ma dico io, gli volete per forza "rubare" il lavoro??? 



--------------------------------------------------
"So che spiegare il proprio problema, in modo comprensibile, richiede un certo impegno ed è un lavoro "palloso", ma qualcuno lo deve pur fare ....., indovina chi?" (Cit. "Scossa")
--------------------------------------------------
excel 2010 ,
Win 8
Post: 3.292
Registrato il: 13/03/2012
Città: LIVORNO
Età: 78
Utente Master
2010
OFFLINE
28/07/2016 20:30

purtroppo la politica della grande maggioranza degli utenti dei forum è questa, trovare soluzioni gratis ai loro problemi, è già tanto se ti ringraziano alla conclusione della discussione

----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
Post: 317
Registrato il: 16/08/2015
Città: CORDENONS
Età: 67
Utente Senior
Excel 2016-32bit Win11
OFFLINE
28/07/2016 22:05

Vado a naso ... trattandosi di un grande lavoro probabilmente una delle macro si è allungata un po' troppo; la dimensione massima di una macro è stata fissata da Microsoft, pertanto, forse è il caso di spezzarla in più parti che poi potranno essere richiamate all'occorrenza.
[Modificato da rollis13 28/07/2016 22:09]

______________________________________________________________
C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto)
Post: 3.293
Registrato il: 13/03/2012
Città: LIVORNO
Età: 78
Utente Master
2010
OFFLINE
28/07/2016 22:24

bravo Rollis in effetti bastava fare una ricerca con google

----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
Post: 69
Registrato il: 01/04/2016
Città: MILANO
Età: 22
Utente Junior
2003
OFFLINE
29/07/2016 09:48

grazie a tutti, ci sono riuscita da sola  
Post: 70
Registrato il: 01/04/2016
Città: MILANO
Età: 22
Utente Junior
2003
OFFLINE
29/07/2016 09:53

e poi, vi ricordo che ho solo 16 anni, non c'è bisogno di fare tanto i grandi    


bastava solo indicarmi come dividere
Post: 71
Registrato il: 01/04/2016
Città: MILANO
Età: 22
Utente Junior
2003
OFFLINE
29/07/2016 10:14

14 anni
Post: 3.294
Registrato il: 13/03/2012
Città: LIVORNO
Età: 78
Utente Master
2010
OFFLINE
29/07/2016 10:37

Re:
donatella2016, 29/07/2016 09.48:

grazie a tutti, ci sono riuscita da sola  


senza l'indicazione di Rollis ?
comunque se veramente hai l'età che dichiari ti invidio moltissimo e sei scusata del non voler condividere il tuo lavoro, col tempo imparerai anche a cambiare questo tipo di atteggiamenti e a fidarti di chi ti puoi fidare.
[Modificato da patel45 29/07/2016 11:01]

----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
Post: 72
Registrato il: 01/04/2016
Città: MILANO
Età: 22
Utente Junior
2003
OFFLINE
29/07/2016 11:25

no, non è vero, ancora non ci sono riuscita,
sono in balia delle onde,
non riesco ancora a dividerla, o perlomeno non so proprio come dividerla,
è vero ho creato un programma, e non voglio metterlo a disposizione di altri, sarò anche egoista.
non conoscendo vba, ho dovuto sgobbare per arrivare ad ultimarlo, mi rimane solo da risolvere questo benedetto errore di routine troppo grande.
e mi tocca sgobbare ancora, se nessuno di voi vuol aiutarmi.
comunque grazie a tutti, almeno mi avete risposto, in buona e cattiva fede.
buone vacanze a tutti.
 
Post: 2.120
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Veteran
Excel 365
OFFLINE
29/07/2016 11:31

Donatella se mi permetti non è vero che nessuno vuole aiutarti.

Sei tu che non ci metti nelle condizioni di farlo.

Giusto per la precisione.

Alfredo
Post: 3.513
Registrato il: 04/07/2012
Città: BARCELLONA POZZO DI GOTTO
Età: 61
Utente Master
2010
OFFLINE
29/07/2016 11:52

donatella2016, 29/07/2016 09.53:

e poi, vi ricordo che ho solo 16 anni, non c'è bisogno di fare tanto i grandi    


bastava solo indicarmi come dividere


ciao
Se Donatella ha veramente 14 anni (no ne sono sicuro) è giustificata solo in parte. A maggior ragione deve imparare i comportamenti corretti, nel forum come nella vita. Aiutarla senza far pesare il suo comportamento a mio avviso scorretto, sarebbe un errore.


[Modificato da ninai 29/07/2016 11:54]



--------------------------------------------------
"So che spiegare il proprio problema, in modo comprensibile, richiede un certo impegno ed è un lavoro "palloso", ma qualcuno lo deve pur fare ....., indovina chi?" (Cit. "Scossa")
--------------------------------------------------
excel 2010 ,
Win 8
Post: 3.295
Registrato il: 13/03/2012
Città: LIVORNO
Età: 78
Utente Master
2010
OFFLINE
29/07/2016 12:05

non sappiamo neppure qual'è la routine troppo grande e neppure quanto è grande.
Inoltre potrebbe essere un falso messaggio perché mi sembra strano che una routine di una userform sia troppo grande.
Il problema è nato solo dopo il tentativo di non rendere visibili alcuni controlli ? senza questa parte di codice funziona tutto ? fai una ricerca sugli array di controlli.
[Modificato da patel45 29/07/2016 12:24]

----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
Post: 3.296
Registrato il: 13/03/2012
Città: LIVORNO
Età: 78
Utente Master
2010
OFFLINE
29/07/2016 12:23

Re:
ninai, 29/07/2016 11.52:


Se Donatella ha veramente 14 anni (no ne sono sicuro) è giustificata solo in parte. A maggior ragione deve imparare i comportamenti corretti, nel forum come nella vita. Aiutarla senza far pesare il suo comportamento a mio avviso scorretto, sarebbe un errore.

ho dato un'occhiata alle precedenti discussioni, ci hanno provato in parecchi a farle cambiare atteggiamento, ma senza risultato, comunque sta andando avanti e prima o poi ce la farà anche da sola.

----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta
Post: 1.941
Registrato il: 27/07/2010
Utente Veteran
OFFLINE
29/07/2016 20:15

Re:
donatella2016, 29/07/2016 09.53:

e poi, vi ricordo che ho solo 16 anni, 



O menti sull'età (14 anni) o menti sulla professione (agente di commercio) ......

P.S.: scommetto che se fosse un maschietto (ammesso che non lo sia) sareste stati meno "indulgenti".

Bye!
scossa

scossa's web site
___
Se tu hai una mela, e io ho una mela, e ce le scambiamo, allora tu ed io abbiamo sempre una mela per uno. Ma se tu hai un'idea, ed io ho un'idea, e ce le scambiamo, allora abbiamo entrambi due idee. (George Bernard Shaw)
Post: 318
Registrato il: 16/08/2015
Città: CORDENONS
Età: 67
Utente Senior
Excel 2016-32bit Win11
OFFLINE
29/07/2016 22:01

Continuo a naso visto che non è ancora stato possibile analizzare il file per intero; se il problema "Routine troppo grande" dipende effettivamente dall'eccessiva lunghezza della macro (se ricordo bene il limite è 64kb) potresti suddividere l'intera macro in almeno 2 o più parti con nomi tipo (mia fantasia):

Sub visibilità1 ()
   If UserForm3.ComboBox2 = "FIXFIN_S" Then ' elimina le voci che non interessano tale tipologia
      UserForm3.Label7.Visible = False
      UserForm3.ComboBox15.Visible = False
      ...
      ...
   End If
   If UserForm3.ComboBox2 = "FIXPOR_S" Then ' elimina le voci che non interessano tale tipologia
      UserForm3.Label7.Visible = False
      UserForm3.ComboBox15.Visible = False
      ...
      ...
   End If
   Call visibilità2
   Call visibilità3
End Sub

Sub visibilità2
   If UserForm3.ComboBox2 = "XXXXXXX"
      ...
      ...
   End If
   ...
   ...
End Sub

Sub visibilità3
   If UserForm3.ComboBox2 = "YYYYYYY"
      ...
      ...
   End If
   ...
   ...
End Sub

In ogni caso, per poter valutare come fare per razionalizzare la ripetizione dei vari If/Then bisogna poter analizzare l'intera serie di macro o almeno tutte quelle legate a questa sezione "visibilità" (ma questo credo te l'abbiano già detto in tanti).
[Modificato da rollis13 29/07/2016 22:10]

______________________________________________________________
C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto)
Vota: 15MediaObject4,17628 5
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 17:48. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com