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

Macro controllo domeniche e festivi

Ultimo Aggiornamento: 11/09/2019 12:18
Post: 23
Registrato il: 01/06/2016
Città: PISA
Età: 64
Utente Junior
2003
OFFLINE
10/09/2019 19:07

Buonasera a tutti.
rieccomi con un altro problema che non riesco a risolvere.
Ho fatto un programma excel (grazie anche al vostro aiuto) che gestisce 5 fogli, uno per postazione (in condivisione). All'interno è presente una macro che controlla la presenza di dati compilati sui singoli fogli e se è presente un foglio non ben compilato, avverte dell'errore, si posiziona sul foglio "incriminato" per procedere con la giusta compilazione. Tutti i fogli hanno in A50 la data odierna (=OGGI()).
Nei giorni feriali va bene così com'è strutturata; nei giorni festivi (intendo le domeniche e le festività solite annuali, comprese pasqua e santo patrono) invece, vorrei cercare di utilizzare un unico foglio, anzichè compilare tutti e 5 presenti. Come posso mettere nella macro un controllo che faccia si che se in A50 la data corrisponde ad un festivo, deve saltare alcune righe di codice della macro stessa?
In pratica:
la data in A50 corrisponde ad un festivo?
se si, go to....
se no, prosegui con la macro.
Spero di essere stato chiaro e di non aver creato confusione...
Uso, come sempre per esigenze "comunitarie", Excel 2003.
Grazie per tutto quello che riuscirete a fare...
Un saluto.
EcoBand
Post: 3.462
Registrato il: 03/04/2013
Utente Master
Excel 2000 - 2013
OFFLINE
10/09/2019 21:51

Sarebbe opportuno allegassi un File (senza Dati sensibili) con alcuni Record significativi già inseriti e chiarissi ciò che desideri ottenere.
Questo eviterebbe a chi desidera aiutarti dover ricostruire una probabile struttura con il rischio di non centrare l'obiettivo.


Giuseppe

Windows XP - Excel 2000
Windows 10 - Excel 2013
Post: 872
Registrato il: 16/08/2015
Città: CORDENONS
Età: 67
Utente Senior
Excel 2016-32bit Win11
OFFLINE
10/09/2019 23:15

Un saluto a tutti.

Tanto per farti un idea.
Con questo codice che ti riporto puoi controllare le domeniche ma per gestire anche le festività bisogna avere da qualche parte nel Foglio la lista delle festività e, pertanto, serve, come ti hanno chiesto, una file da poter valutare.
If Weekday(Range("A50")) <> 1 Then
    'dato che non è domenica fai le queste operazioni
    '...
    '...
Else
    'la domenica fai queste altre operazioni
    '...
    '...
End If

oppure, più drasticamente, così:

If Weekday(Range("A50")) = 1 Then Exit Sub   'dato che è domenica abbandona la macro

'altrimenti continua a fare le solite operazioni
'...
'...
[Modificato da rollis13 10/09/2019 23:19]

______________________________________________________________
C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto)
Post: 23
Registrato il: 01/06/2016
Città: PISA
Età: 64
Utente Junior
2003
OFFLINE
11/09/2019 12:18

rispondo a tutti.
Innanzitutto grazie per la tempestività nel rispondere: siete una risorsa irrinunciabile ed indispesnsabile!!!
Non ho allegato alcun file perchè essendo stracolmo di dati sensibili, avrei impiegato qualche giorno per eliminarli (sia come dati nelle celle, che come intestazioni). Però grazie alle risposte ricevute, mi avete acceso la famosa lampadina rimasta spenta: sono riuscito a risolvere il mio problema: dimenticavo che nel programma era presente una routine che calcola automaticamente le festività annuali, comprese le pasque e pasquette.
Al di la di questo, ringraziarvi non è mai abbastanza.
Auguro a tutti voi una spendida giornata, e ancor di più!
Con affetto e sincerità.
Elio
EcoBand
Vota:
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | 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 06:27. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com