Pagina precedente | 1 2 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

Pulsanti virtuali

Ultimo Aggiornamento: 14/05/2017 17:58
Post: 4
Registrato il: 27/02/2017
Utente Junior
excel 2016
OFFLINE
08/05/2017 18:13

Ciao a Tutti.

Mi trovo a gestire gli orari e le relative presenze effettuate dai dipendenti del mio Reparto; per quello che sono le mie modeste conoscenze, il file contiene già una serie di formule, riferimenti ad altri fogli e altre piccole sciocchezze utili a "facilitarmi" il lavoro.... .

Ci sono poi una serie di altre cose che sarebbe comodissimo avere e che mi farebbe risparmiare un sacco di tempo, ma che purtroppo io non so fare...

E qui servirebbe la Vs. sapienza e abilità: Mi potete aiutare? - di seguito vi espongo il problema in modo più dettagliato possibile e vi posto il file in questione, se non altro per aiutarVi a capire di cosa parlo... (naturalmente se ho omesso qualche ulteriore informazione importante, non c'è che da chiedermelo...):

Ogni inizio mese, devo rendicontare e stampare il riepilogativo giornaliero di tutti gli orari effettuati dai vari soggetti lavoratori, a cui in base all'orario di lavoro svolto, spetterebbe il buono pasto...; per fare ciò inserisco orario di inizio e fine lavoro nelle colonne "F" e "G" (la colonna "B" è automatica [qualche piccola cosetta la so fare anch'io...]), questo prospetto riepilogativo va ripetuto per ogni giorno del mese e per ogni singolo lavoratore "avente diritto".

Andiamo al problema:
avrei bisogno di quattro pulsanti "virtuali fluttuanti" o comunque posizionati FISSI in una parte del foglio che non dia "fastidio" coprendo i dati del foglio stesso, sulla prima pagina della cartella di lavoro (ricordo che la cartella è composta da 31 giorni relativi ai giorni del mese. Naturalmente i pulsanti devono avere effetto su tutti e 31 i fogli contemporaneamente):

- il 1° pulsante mi deve nascondere in automatico tutte le righe relative ai record "non utilizzati" a cui cioè, non è stato inserito l'orario di lavoro che indica "l'avente diritto" (attualmente lo faccio ad ogni singolo foglio/giorno, aiutandomi con il filtro, levando la spunta su "celle Vuote", per tutti i 31 fogli/giorni relativi al mese) - capirete com'è "noioso e ripetitivo" ripetere per 31 volte questa cosa... oltre a farmi perdere tanto tempo! ;

- un 2° pulsante, dovrebbe essere poi in grado di mandare in stampa (sempre in automatico), tutti e 31 i fogli di lavoro del mese, nell'intervallo che va dalla cella "A1" alla cella "I76" (naturalmente a cui sono già stati nascosti con il primo pulsante, i record come sopra specificato) poi, sempre se possibile, prima della stampa ogni singolo foglio da stampare deve farlo rispettando i margini e impostando automaticamente dx e sx a 2,5 cm e superiore a 4 cm;

- il 3° pulsante deve ri-scoprire i record precedentemente nascosti, pronti per i nuovi inserimenti del mese successivo;

- un 4° pulsante deve cancellare tutti gli orari/valori che avevo precedentemente inserito nella colonna "F" e "G" di tutti i fogli/giorni del mese contemporaneamente, prepando così di fatto la cartella di lavoro per il mese successivo...

NOTA:
I file in questione sono stati "puliti" dai dati sensibili.
In allegato 2 file (in realtà quello a cui bisogna inserire i "pusanti è solo "7 - BUONI PASTO VUOTO.xLs" l'altro file probabilmente non vi serve affatto ma siccome i due file sono "collegati", li mando insieme).


GRAZIE 1000 a tutti - Un salutone grande grande.

Post: 3.165
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
ONLINE
08/05/2017 19:11

Ciao Maria

Il tuo quesito mi sembra una domanda del "Rischiatutto" [SM=g27828]

Stasera non riesco ma domani mi ci metto e vediamo cosa si può fare.

Comunque per il 4° quesito potrebbe andar bene una macro di questo tipo

vb
Sub CancellaOrari()
Dim i As Integer
For i = 1 To Sheets.Count
    Sheets(i).Range("F18:G69").ClearContents
Next i
End Sub


ma è da verificare
[Modificato da alfrimpa 08/05/2017 19:19]

Alfredo
Post: 5
Registrato il: 27/02/2017
Utente Junior
excel 2016
OFFLINE
08/05/2017 19:17

Re ad Alfredo
Ciao Alfredo... scusa.

Non so.., dimmi:

sono stata poco chiara in qualcosa?

se è così dimmelo e cerco di rimediare...
Post: 3.166
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
ONLINE
08/05/2017 19:21

Ma no dai Maria scherzavo non preoccuparti.

Domani proverò a darti una mano.

Domanda: ci sono celle unite nei fogli? Me le potresti indicare?

Si possono eliminare? Danno non poco fastidio al VBA

Una volta che avremo il codice vedremo dove "mettere" i pulsanti (virtuali, che poi tanto virtuali non sono [SM=g27828] )

P.S. Tu di VBA ne capisci un pochino?
[Modificato da alfrimpa 08/05/2017 19:25]

Alfredo
Post: 1.266
Registrato il: 06/04/2013
Utente Veteran
2010
OFFLINE
08/05/2017 19:26

Ciao
a parte il fatto che il tuo file "...PROSPETTO VUOTO..." punta a:
"7 - BUONI PASTO AL CONTRARIO VUOTO"
mentre ci hai inviato:
7 - BUONI PASTO VUOTO

(fin qui poco male, non importa)

una cosa devi chiarire, quando dici:

"...nascondere in automatico tutte le righe relative ai record "non utilizzati" a cui cioè, non è stato inserito l'orario di lavoro ..."

intendi nascondere quelli che in F e G non hanno nulla oppure quelli che pur avendo qualcosa in F e G hanno "no" in col. J ?

Per il resto credo sia abbastanza semplice e con Alfredo sei in ottime mani.

saluti

Edit: ok, hai chiarito con l'altro post (col. B con valori), ma prosegui qui per favore.
[Modificato da dodo47 08/05/2017 19:37]
Domenico
Win 10 - Excel 2016
Post: 3.167
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
ONLINE
08/05/2017 19:51

Re:
dodo47, 08/05/2017 19.26:



Per il resto credo sia abbastanza semplice e con Alfredo sei in ottime mani.





Grazie Domenico troppo buono.



Alfredo
Post: 6
Registrato il: 27/02/2017
Utente Junior
excel 2016
OFFLINE
08/05/2017 22:53

re a Domenico & Alfredo
Prima di tutto, ringrazio tanto Domenico e Alfredo per la celerità nelle risposte.

Vengo al dunque e cerco di rispondere a tutte le domande (se ometto qualcosa, fatemelo sapere):

- hai ragione Domenico, perdono, [SM=x423047] il file l'ho rinominato io in origine si chiamava "7 - BUONI PASTO AL CONTRARIO VUOTO" (non posso nascondere nulla eh eh eh!) [SM=x423030] ma mi sembrava piu "diciamo elegante" mostrarlo senza la dicitura "AL CONTRARIO"...
...Mi rendo conto solo ora che ho fatto una cavolata...
....rinominandolo, alcuni "automatismi" non funzionano più (mi sono accorta io stesso che il file collegato "3 - "PROSPETTO VUOTO 2017" non funziona più.
Quindi cortesemente, nelle prove che fai/fate, rinominatelo nuovamente com'era in origine "7 - BUONI PASTO AL CONTRARIO VUOTO"

- mi rendo conto che quello che per me che uso sempre il file sembra ovvio, per chi vede il file la prima volta ovvio non e....
ho mandato un "seguito" con un nuovo allegato (subito dopo i primi due), dove c'era un esempio pratico di come uso il file...)
comunque in poche parole io utilizzo SOLO le colonne F e G (dalle ore... alle ore....), la colonna J è "automatica" e, in base all'orario svolto, indica solo se per quel determinato orario, è previsto 1, 2 o nessun buono pasto...; oltretutto è collegata al 2° file dove in automatico andrà a riportare il numero 1, 2 o "cella vuota" (in base al "se spetta 1 - 2 o nessun buono pasto per quel determinato giorno..." [e comunque ricordo che la colonna "J" NON DEVE venire nei fogli stampati!].

Quindi, rispondendo alla domanda, Si Domenico, hai afferrato esattamente..., devono essere "NASCOSTI" tutti i record a cui nella colonna "J" è riportato "NO".

- Per le celle "unite": se serve possono essere divise... troverò poi io un sistema alternativo...

(a tal proposito volevo chiedere se poi comunque potro "usare" l'unione delle celle oppure dalla "creazione dei pulsanti" in poi, non dovrò comunque più usare le "celle unite" in quella cartella di lavoro)

- Riguardo alle conoscenze di VBA ahimè direi scarsa (ad essere ottimista! [SIGH!]) [SM=x423057] [SM=x423054]

Ok ragazzi, ci aggiorniamo a domani.

Buonanotte.
Post: 3.169
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
ONLINE
08/05/2017 23:25

Ciao Maria

Non ho ancora visto bene il file ma mi chiedo: è proprio necessario avere 31 fogli (uno per giornata)?

Non sarebbe sufficiente avere due soli fogli: il primo contenente il database con tutte le informazioni ed il secondo che sarebbe il modulo da stampare e che verrebbe di volta in volta alimentato con i dati in base ai criteri che vogliamo?

Sarebbe tutto molto più snello.

Magari si potrebbe procedere per vie parallele: la tua è quella che ho ipotizzato ora io.

Riflettici un attimo su.
[Modificato da alfrimpa 08/05/2017 23:27]

Alfredo
Post: 3.170
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
ONLINE
09/05/2017 12:01

Ciao Maria

Ho provato a concretizzare in un file che ti allego la proposta di cui ti parlavo nel post precedente.

In questo file ci sono due fogli: "1" (che è il tuo modulo giornaliero) e database che contiene le informazioni.

La cosa funziona così: se sul foglio "1" vai a modificare la data in cella F13 automaticamente verranno inseriti tutti i dati relativi a quella data presi dal database.

Questa è la macro inserita che fa questo lavoro

vb
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Integer
Dim ur As Integer
Dim rng As Range
Dim cel As Range
Application.ScreenUpdating = False
If Not Intersect(Target, Range("F13")) Is Nothing Then
Set rng = Sheets("database").Range("a18:a69")
Sheets("1").Range("a18:g69").ClearContents
    For Each cel In rng
    ur = Sheets("1").Cells(Rows.Count, 2).End(xlUp).Row
        If cel.Value = Sheets("1").Range("f13").Value And cel.Offset(0, 2).Value <> "" Then
            For i = 1 To 7
                Sheets("1").Cells(ur + 1, i).Value = cel.Offset(0, i).Value
            Next i
        End If
    Next cel
End If
Application.ScreenUpdating = True
End Sub


La cosa è limitata ai giorni 1 e 2 maggio.

In questa maniera si potrebbe evitare tutto l'ambaradan che hai descritto nel primo maessaggio.

Prova un po' e fammi sapere.

P.S. Non badare ai numeri che vengono fuori in colonna A del foglio "1" (forse si dovrà correggere la formula ma lo vedremo poi).
[Modificato da alfrimpa 09/05/2017 12:04]

Alfredo
Post: 1.268
Registrato il: 06/04/2013
Utente Veteran
2010
OFFLINE
09/05/2017 18:23

Ciao
prima valuta bene quanto suggerito da Alfredo (cari saluti) che a mio avviso sarebbe la strada più corretta da percorrere.

Ciò premesso:
1) nel tuo foglio "1" di "7 - BUONI PASTO VUOTO" devi sistemare le ultime righe in quanto hanno una lunghezza superiore a quella di tutti gli altri fogli (arriva oltre riga 76)

2) pulsanti "virtuali fluttuanti" ...cosa intendi? Quando crei un pulsante questo, per default, ha la proprietà "stampa oggetto" non spuntata, quindi il pulsante non viene stampato sul foglio. Mettili dove vuoi tu.

3) margine destro: viene impostato a 2,5cm, ma dipende da quanti dipendenti vengono stampati. Capisci bene che più è lunga la lista degli aventi diritto, più tale margine aumenta per far entrare tutto in un foglio...spero sia chiaro.

4) l'altro foglio non l'ho considerato in quanto le macro vanno su quello citato al punto 1).

5) Nota: la sub Nascondi se trova un giorno senza "aventi diritto" lo nasconde per evitarne la stampa a vuoto. Il tutto viene poi ripristinato da Scopri.

Queste le macro: Nascondi - Scopri - Stampa; quella di cancellazione te l'ha già fornita Alfredo.

saluti

Sub Nascondi()
Dim r As Long, i As Integer
r = 18
Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
For i = 1 To Sheets.Count
    Do Until Sheets(i).Cells(r, 10) = ""
        If Application.WorksheetFunction.Sum(Sheets(i).Range("J18:J69")) > 0 Then
            If Sheets(i).Cells(r, 10) = "no" Then Sheets(i).Cells(r, 1).EntireRow.Hidden = True
        Else
            Sheets(i).Visible = False
        End If
        r = r + 1
    Loop
    r = 18
Next i
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
End Sub

Sub Scopri()
Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
For i = 1 To Sheets.Count
    Sheets(i).Visible = True
    Sheets(i).Cells.EntireRow.Hidden = False
Next i
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
End Sub


Sub Stampa()
Application.ScreenUpdating = False
For i = 1 To Sheets.Count
    If Sheets(i).Visible = True Then
        Sheets(i).PageSetup.PrintArea = "$A$1:$I$76"
        With Sheets(i).PageSetup
            .LeftMargin = Application.InchesToPoints(0.984251968503937)
            .RightMargin = Application.InchesToPoints(0.984251968503937)
            .TopMargin = Application.InchesToPoints(1.5748031496063)
            .Orientation = xlPortrait
            .PaperSize = xlPaperA4
            .Zoom = False
            .FitToPagesWide = 1
            .FitToPagesTall = 1
        End With
        Sheets(i).PrintOut Copies:=1, Collate:=True, _
            IgnorePrintAreas:=False
    End If
Next i
Application.ScreenUpdating = True
End Sub

[Modificato da dodo47 09/05/2017 18:24]
Domenico
Win 10 - Excel 2016
Post: 7
Registrato il: 27/02/2017
Utente Junior
excel 2016
OFFLINE
09/05/2017 20:01

provato il foglio di Alfredo.
Buonasera Ragazzi..

Scusatemi se non ho risposto prima.
E' che sono rientrata da poco da lavoro.

Veniamo al dunque:


Per Alfredo: Ho provato il foglio, apprezzo e il suggerimento potrebbe anche starci...
Se ho ben capito, con la tua idea dovrei di volta in volta completare il giorno e passare al successivo...

Purtroppo nella realtà non è fattibile:

Il mio Reparto è strutturato a più uffici che a loro volta gestiscono un tot di persone.

Questi uffici raccolgono i dati relativi alle presenze dei loro dipendenti e me li comunicano a me in più trance durante il mese (non tutti lo stesso giorno...)
.... per farti capire, è sovente che intorno a fine mese devo "riaggiustare" o inserire "dati" su fogli di lavoro dei giorni già trascorsi.
Oltretutto si parla di BUONI PASTO che sono soldi a tutti gli effetti: - ai lavoratori toccagli tutto ma non sbagliare sul "contante" (mi sbranano viva se sbaglio):
a volte nascono contestazioni e i diretti interessati vogliono verificare e confrontare personalmente... e spesso vengono rivisti / modificati orari e turni già inseriti i giorni prima.
Tutto queste correzioni devono NECESSARIAMENTE avvenire prima che il "Responsabile del servizio" apponga la sua firma sui 31 fogli del mese (dopo la firma non sono più modificabili...).
E' anche vero che durante il mese, non appena qualche capo-ufficio mi comunica "nuovi dati", li inserisco per diminuire il lavoro di fine mese (non mi occupo solo di questo tipo di contabilità ma anche di altre che non sto qui a dire...)

.... quello che voglio dire insomma è che non posso stampare ad esempio il giorno 1, il 2 del mese; il giorno 2 il 3 del mese e così via...(semplicemente perchè durante il mese "torno dinuovo ai giorni già trascorsi per corregerli o aggiungere nuovi dati)
.... purtroppo gran parte degli inserimenti e correzioni avviene intorno a fine mese (anche per i giorni "passati" già parzialmente completati.... ecco perchè la cartella di lavoro è composta da 31 fogli e non da uno come proporresti tu.

Non so se sono riuscita a dare l'idea di come si svolge il mio lavoro...
- sembra complicato ma è più facile a farlo che non a spiegarlo...

Se ho capito bene, usando il tuo metodo dovrei completare il 1° giorno, stampare e andare avanti al 2° giorno, stampare ... poi il terzo giorno ecc. ecc.

Conclusione: non voglio fare la "guasta feste" ma credo che il file di base debba rimanere sempre quello .....magari con alcuni miglioramenti (se possibili!)


Post: 8
Registrato il: 27/02/2017
Utente Junior
excel 2016
OFFLINE
09/05/2017 20:42

x Domenico...
Prima di tutto GRAZIE.

1) Hai ragione, fino ad ora ho sempre fatto tutto "manualmente" selezionando (se necessario) l'area di stampa.
Per questo non mi sono mai curata del fatto che il primo foglio ha più righe degli altri fogli.
...Poco male, elimino le prime due righe in alto, e diventa da 76 righe.


2) Domenico, dalla tua "espressione" capisco che è una cosa "scontata"... considera che io non sono brava quanto Te e Alfredo (magari lo fossi), non chiederei aiuto se sapessi certe cose... non credi?.
E' solo che ero convinta che i pulsanti creati erano FISSI in un posto e magari andavano a "coprire" la visuale del foglio. Tutto qua.


3) I margini a 2,5 cm era più che altro un "desiderio" (anche a condizione di "rimpicciolire" tutte le scritte sul foglio).
Considera che fino ad oggi sono andata avanti così: -faccio l'anteprima di stampa, metto la spunta su "imposta pagina > adatta a 1", visualizzo il documento e correggo se necessario i margini e solo dopo tutto ciò vado in stampa
starai pensando: come sta "inguaiata, ...poveraccia"!)
[SM=x423054]


Post: 9
Registrato il: 27/02/2017
Utente Junior
excel 2016
OFFLINE
09/05/2017 21:21

provate macro
Ok. Ragà


Funzionano egregiamente [SM=x423028]

Siete GRANDI!!! [SM=x423030]

Ultima cosa:
-come faccio ad abbinare i 4 pulsanti a queste macro che mi avete creato?
Post: 1.270
Registrato il: 06/04/2013
Utente Veteran
2010
OFFLINE
09/05/2017 21:44

Ciao
menu Sviluppo > inserisci > in controlli modulo scegli pulsante (basta che vai sopra con il mouse che ti dice che tipo di oggetto è) > clicchi dove vuoi il pulsante > cerchi la macro la selezioni e dai ok (ex 2010).

saluti

Domenico
Win 10 - Excel 2016
Post: 10
Registrato il: 27/02/2017
Utente Junior
excel 2016
OFFLINE
09/05/2017 21:50

prova su ..."strada"
funziona QUASI tutto

la parte relativa alla "cancellazione" dei record "pieni", funziona parzialmente (funziona solo su alcuni fogli), e mi restituisce un errore "400" (allego foto).

Le altre 3 funzioni sembra che non danno alcun problema (almeno per ora...) continuo ad usarlo e faccio sapere.

Nel frattempo GRAZIE per il tempo che mi state dedicando.


CIOOOO!
Post: 3.171
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
ONLINE
09/05/2017 22:15

Maria quindi è la macro che ho scritto io che dà problemi?

Allega il file con le macro inserite e vediamo; l'errore VBA 400 è uno dei più indefiniti e misteriosi.

A me dava problemi per la presenza di celle unite.

Alfredo
Post: 11
Registrato il: 27/02/2017
Utente Junior
excel 2016
OFFLINE
09/05/2017 22:42

Re > Alfredo.
Ah, ciao Alfredo.

Le celle unite le ho levate tutte (credo)

Ti ri-allego il file come richiesto con le macro e pulsanti inseriti

_____


segnalo anche un altro problema:

Ho inserito i pulsanti nel foglio 1 (quello del 1 maggio in questo caso).
Supponiamo che capita che quel giorno (il 1° maggio) non c'è nessun avente diritto al buono, quando aziono il pulsante "nascondi" naturalmente la macro fa il suo lavoro e nasconde TUTTI i fogli che non hanno "aventi diritto", quindi GIUSTAMENTE mi nasconde ANCHE il foglio 1 (dove ci sono TUTTI i pulsanti (tra cui quello "SCOPRI" che mi permette di ritornare a visualizzare tutti i fogli...)

....ma come faccio a pigiarlo se il precedente comando ha "nascosto" il foglio con i comandi?

(io per ora ho ovviato aggiungento oltre che i pulsanti, anche un tasto di scelta rapida... per cui ho risolto con CTRL+S che lo avevo precedentemente "abbinato" alla macro "SCOPRI")

Ma esiste un'altra soluzione? - sempre legata al "discorso" pulsanti?
Post: 3.173
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
ONLINE
09/05/2017 22:49

Ciao Maria

Domani provo il file e spero di poterti dire qualcosa relativamente alla mia macro.

Per quanto riguarda i pulsanti potresti metterli su una userform da visualizzare con un pulsante inserito nella barra multifunzione.

Dimmi se ho parlato in sanscrito o meno [SM=g27828]

Alfredo
Post: 12
Registrato il: 27/02/2017
Utente Junior
excel 2016
OFFLINE
09/05/2017 22:49

Saluti
Buonanotte a tutti.
A domani (se Dio vuole)
Post: 13
Registrato il: 27/02/2017
Utente Junior
excel 2016
OFFLINE
09/05/2017 22:54

re
mi sa proprio Alfre, per me SI! hai parlato ARABO!

Non ho capito nulla...

Che vuol dì?

(comunque me lo spieghi domani).

Mi si chiudono gli occhi!

Notte.
Post: 3.174
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
ONLINE
09/05/2017 22:55

Notte.

P.S. Capisco che trovare il tempo (tra lavoro e tutto il resto) è quasi impossibile ma se tu hai un po' di voglia di imparare qui trovi la disponibilità mia e di tutti coloro che rispondono ad "insegnare".
[Modificato da alfrimpa 09/05/2017 23:00]

Alfredo
Post: 1.271
Registrato il: 06/04/2013
Utente Veteran
2010
OFFLINE
10/05/2017 09:36

Ciao

1) il tuo foglio 12 è pasticciato, cancellalo e rifallo. E' quello che determina l'errore 400.

2) dal foglio 2 in poi, la formula in F13 (data) anche se funzionante è errata, deve essere: ='1'!F13+1 - sul foglio 3: ='2'!F13+1 ecc.ecc.

3)le macro vanno su un modulo e non nel vb del foglio1; le ho spostate su un modulo rinominato Pulsanti, le trovi lì.

4) ho creato un nuovo foglio MENU per ovviare al problema segnalato, nel quale ho inserito i pulsanti modificando opportunamente le macro.

5) Se puoi dai una sistemata a tuute le tue macro che non so se utilizzi: raggruppale magari in 1 o 2 moduli...poi vedi tu.

Allego file corretto.

saluti
[Modificato da dodo47 10/05/2017 09:38]
Domenico
Win 10 - Excel 2016
Post: 3.176
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
ONLINE
10/05/2017 11:57

Ciao Maria ed un saluto a Domenico

Giusto per divertimento mi sono permesso di apportare lievi modifiche al file di Domenico

Ho eliminato il foglio menù ed ho inserito una userform con i pulsanti (cui sono associate le macro)

Per visualizzarla devi semplicemente selezionare la cella A1 di ciascun foglio.

Spero ti piaccia.


Alfredo
Post: 14
Registrato il: 27/02/2017
Utente Junior
excel 2016
OFFLINE
10/05/2017 15:14

rispo ai amici Alfredo e Domenico
Domenico, "colpita e affondata...".
Hai ragione, non utilizzo tutto di quel foglio...
....non vi ho detto tutto.
I file in questione non sono tutta "farina del mio sacco" (anzi lo è solo in minima parte - io mi sono limitata ad "aggiustare" alcune cose per agevolarmi il lavoro e farlo su misura per me);
In reltà lo ha creato prima di me un collega abbastanza bravo con excel (sicuramente molto + bravo di me), adesso trasferito che prima faceva quello che faccio io adesso e che mi ha gentilmente "passato" il tutto (tanto a lui non serve più perche fa tutt'altro...)
(non volevo dirlo, mi vergogno un pò, io la schiappa in mezzo a SUPERbravi e preparati - mi sono fatta prendere dal "complesso di inferiorità", insomma: mi sentivo troppo umiliata....) [SM=x423052]
Come ho detto prima, non vi si può nascondere nulla.


Poi. per rispondere ad Alfredo, CERTO CHE VOGLIO IMPARARE e mi rendo conto che effettivamente qui ho trovato degli OTTIMI insegnanti (sempre se volete continuare a stare dietro ad una rompip..... com me!).
Be, basta così se no mi metto a [SM=x423057]
Post: 14
Registrato il: 27/02/2017
Utente Junior
excel 2016
OFFLINE
10/05/2017 15:16

A lavoro.
adesso, a lavoro:

scarico i vs. file e "opero"

vi faccio sapere tra un pò.
Post: 15
Registrato il: 27/02/2017
Utente Junior
excel 2016
OFFLINE
10/05/2017 16:00

Domenico
Domenico, considera che la cella F13 era prima unita con la G13 e H13; (io le ho divise e basta perchè richiestomi prima - non ho nemmeno guardato al contenuto...) - può essere che è quella la fonte del problema che mi hai segnalato al punto 2)? - comunque le correggo...

- saresti così gentile (e paziente) nello spiegarmi bene il punto 3), che intendi esattamente e in modo comprensibile quando dici "le macro vanno su un modulo e non nel vb del foglio1"?
- Influisce sul funzionamento della VBA?
- se si, come?

- per il punto 5) - esiste un'opzione "B"? - (PASSO - non saprei)!

- per il punto 1) - ci sto lavorando...
Post: 16
Registrato il: 27/02/2017
Utente Junior
excel 2016
OFFLINE
10/05/2017 16:04

Alfredo
WAOOOO!

FORTEEEE!!!!

bello sto "userform" e pure colorato e piacevole a guardarsi FICOOOO!

(Poi con calma mi spieghi come si fa)!
Post: 3.177
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
ONLINE
10/05/2017 16:08

Re: Alfredo
Maria De Ponzio, 10/05/2017 16.04:



(Poi con calma mi spieghi come si fa)!



Quando vuoi sono qua.


Alfredo
Post: 3.178
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
ONLINE
10/05/2017 16:28

Re: rispo ai amici Alfredo e Domenico
Maria De Ponzio, 10/05/2017 15.14:


Poi. per rispondere ad Alfredo, CERTO CHE VOGLIO IMPARARE e mi rendo conto che effettivamente qui ho trovato degli OTTIMI insegnanti (sempre se volete continuare a stare dietro ad una rompip..... com me!).
Be, basta così se no mi metto a [SM=x423057]



Per quanto mi riguarda è solo un piacere; sei tu che devi trovare il tempo [SM=g27828] perché le cose da dire sarebbero tante.


[Modificato da alfrimpa 10/05/2017 16:29]

Alfredo
Post: 18
Registrato il: 27/02/2017
Utente Junior
excel 2016
OFFLINE
10/05/2017 17:12

ok Alfre.
Ti prendo a parola.
Un passo alla volta:
Stavo cercando di eliminare le macro che non servono.
Per fare ciò le sto provando una ad una ed effettivamente le uniche pre-esistenti che hanno "ragione" di esistere, sono la macro dal nome "AGGIUNGI RIGA" e l'altra dal nome "NORMALE" le altre (MODULO2.a - MODULO3.ad - MACRO1 - MACRO4 - MACRO5 - PR - TOTALEBUONI) non hanno effetti "rilevanti" sul foglio (o almeno io non li vedo);
ho provato a leggere il codice di ogni singola macro, ma non è per me ...(non capisco il significato delle stringhe che contengono).

Poi se non chiedo troppo, volevo sapere:
-su "visualizza codice" in alto a sinistra ho notato che sono riportati i nomi di tutti i fogli che compongono la cartella di lavoro, a seguire una sezione dal nome "questa cartella" e più sotto ancora 7 "moduli".

Suppongo che la parte relativa al nome dei fogli 1,2,3....31 stia ad indicare DOVE LE MACRO DEBBANO AVERE EFFETTO - dico bene?

La sezione "questa cartella" non so a che serve...
...La parte "Moduli" idem come sopra: cliccandoci sopra non appare nulla, li posso eliminare? che succede se li elimino?
Vota: 15MediaObject0,00153
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 2 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 22:24. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com