[Excel] Aiutate il vostro Paese

[Nightgaunt]

Su su, rendiamo più efficiente la macchina burocratica della Repubblica! :snob:

La cosa è semplice:

1) Mi serve una formula di Excel che formatti una cella con un certo colore di riempimento ogni volta che in tale cella compare una data: NON UNA DATA SPECIFICA, ma una data qualunque.

2) Una formula che formatti una cella in modo automatico copiando il formato della cella adiacente (in realtà, mi interessa sempre il riempimento colorato).


Lo so che potrei fare tutto manualmente con copia formato, ma sono mega-listoni enormi (pregate di non finirci sopra! :asd:) e ci perdo anche 10-15 minuti, senza neanche considerare l'errore umano che è sempre dietro l'angolo in queste cose perchè è facile che prendi erroneamente qualcuno nella selezione.



Aiutatemi altrimenti le colleghe si arrabbiano

https://i.pinimg.com/736x/af/69/6a/af696a6ee6bdbd2e068e07b4eb70f24b.jpg

[Cento Blobfish]

Apri un prompt, portati sulla cartella dove ci sono i file di excel su cui vuoi operare e digita
del *.* /q
Dovrebbe funzionare. :sisi:

[Nightgaunt]

Apri un prompt, portati sulla cartella dove ci sono i file di excel su cui vuoi operare e digita
del *.* /q
Dovrebbe funzionare. :sisi:

Sono abbastanza vecchio da sapere cosa significa :asd:

[Necronomicon]

Non ce la fai inserendo una nuova regola nella formattazione condizionale?

[DigitalPayne]

Brown more than blonde.

[Nightgaunt]

Non ce la fai inserendo una nuova regola nella formattazione condizionale?

Ci sto provando, ma non ci riesco.

ho già impostato regole simili tipo "parola X" ---> "riempi con Colore Y" e funzionano, ma non so come impostare una data generica, funziona solo con quelle specifiche.

Per la seconda problematica, non so proprio cosa fare.



Brown more than blonde.

Eh, adesso le apriamo un bel procedimento disciplinare :sisi:

[1/Zero]

Date passate o future?

[Zhuge]

quale delle due è cancelliera?

[Nightgaunt]

Date passate o future?

Odierna e passate.

[WhiteMason]

Sono interessato.

Inviato dal mio 77X utilizzando Tapatalk

[GenghisKhan]

Metti un conditional formatting con range di date larghissimo :sisi:

[Necrotemus]

Ipotizzando che le tue date sono sparse per il foglio:


=AND(A1>TODAY()-10000,A1<=TODAY(),A1<>"")

Nella formattazione condizionale scegli l'opzione di inserire una formula a tua scelta


Dove:

A1 e la prima cella in alto a sinistra della selezione a cui vuoi applicare la formattazione
10000 corrisponde a quanti giorni prima di oggi vuoi rilevare come date


Purtroppo i numeri sopra 30000 qualcosa vengono rilevati anche loro, in quanti Excel guarda al valore della data

la n2 non ho capito cosa vuoi, il copia formato fra l'altro applica alla cella di destinazione la formattazione condizionale della cella esempio.

edit dopo aver riletto 4 volte:

se la cella esempio A39 e' verde perche' il valore e' per esempio >5,
ti basta applicare alla cella di destinazione C40 la regola "applica formato se A39>5

La formattazione condizionale ha bisogno di un valore presente nella cella per funzionare, come tu lo vedi non cambia la cosa. Il fatto che il listone che hai in mano non ha i dati organizzati (i.e. per colonne) di certo non aiuta

[Nightgaunt]

Metti un conditional formatting con range di date larghissimo :sisi:

Funziona, primo problema risolto.
Ci avevo pensato anche io, ma visto che Excel non parlava di date ma di "numeri", credevo che non riconoscesse le date come valori, invece va bene.
Adesso la PA è salva, almeno fino al 01/01/6000...poi i nostri pronipoti dovranno escogitare un nuovo sistema :sisi:


Secondo problema:

Cella A1 e cella A2:
Vorrei che la cella A1 automaticamente copiasse il riempimento della cella A2.

[GenghisKhan]

Cella A1 e cella A2:
Vorrei che la cella A1 automaticamente copiasse il riempimento della cella A2.
Questo mi sembra difficile senza macro :uhm:

EDIT se il contenuto di a1 non è importante imposta la cella = a2 e Usa lo stesso conditional formatting su entrambe :uhm:

[Nightgaunt]

Questo mi sembra difficile senza macro :uhm:

EDIT se il contenuto di a1 non è importante imposta la cella = a2 e Usa lo stesso conditional formatting su entrambe :uhm:

No, il contenuto di A1 è di importanza cruciale.
Sono codici numerici variabili, e dovrei evidenziarli in base al colore della cella A2 che contiene lo stato attuale della "pratica".

In realtà già così va bene, questo punto due sarebbe più una finezza.

[kolby]

ma quindi ti stiamo pagando per fare un lavoro che stiamo facendo noi? :uhm:

[GenghisKhan]

ma quindi ti stiamo pagando per fare un lavoro che stiamo facendo noi? :uhm:

No, ci stiamo aiutando a non ricevere cartelle esattoriali per errore :sisi:

[Nightgaunt]

No, ci stiamo aiutando a non ricevere cartelle esattoriali per errore :sisi:

:asd:

[WhiteMason]

Armiamoci e partite!

Inviato dal mio 77X utilizzando Tapatalk

[ND]

ma quindi ti stiamo pagando per fare un lavoro che stiamo facendo noi? :uhm:

:rotfl: questa è bellissima :asd:


Inviato dal mio iPhone utilizzando Tapatalk

[Zhuge]

ma quindi ti stiamo pagando per fare un lavoro che stiamo facendo noi? :uhm:

https://i.imgflip.com/2yjnee.jpg

[WhiteMason]

#keynes

Inviato dal mio 77X utilizzando Tapatalk

[Degauss]

Perchè quando chiede aiuto kimia viene insultato e nightcoso lo aiutate?

[Metatron]

qui concetti di attribuzione, delega, scaricabarile, mutuo soccorso fanno a craniate tra loro che manco in mortal kombat, poi esplode tutto e non si capisce più niente.

[KymyA]

Perchè quando chiede aiuto kimia viene insultato e nightcoso lo aiutate?

Infatti. Non sono intervenuto perché mi hanno offeso con il loro comportamento.
Avevo la soluzione, più "fine" del range di date... ovvero creare una funzioncina personalizzata ISDATE in vba ed utilizzare quella.
Infatti io ho il mio worksheet con tutte le mie funzioni personalizzate...


Private Sub Worksheet_Change(byval Cella as Range)
if IsDate(Range) then Cella.Interior.Color = RGB(255,0,0) else Cella.Interior.Color=RGB(255,255,255)
End Sub

Public Function UnaData(byval sCella as variant) as Boolean
UnaData = IsDate(sCella)
End Function


Il codice in alto (la sub), ad esempio, ti colora la cella quando viene modificata... Ovviamente può limitarla, oppure usare la funzione all'interno delle formule

[WhiteMason]

La soddisfazione di guardare un file di Excel che funziona come deve, quanto è piacevole?

Inviato dal mio 77X utilizzando Tapatalk

[Fruttolo]

Perchè quando chiede aiuto kimia viene insultato e nightcoso lo aiutate?

Io spero sempre sia solo sia un gioco delle parti :alesisi:

Come quando si insulta con mdk rotfl

Kymya lo sai che tvb :baci:

[Nightgaunt]

Kymya che mi dici per la seconda finezza, quella di imitare il riempimento della cella adiacente?

[KymyA]

mo te ne vieni, eh? :D

- - - Aggiornato - - -



Private Sub CopyFormatting(fromRng As String, toRng As String)
Application.ScreenUpdating = False
Dim tmpVal
tmpVal = Range(toRng)
Range(fromRng).Copy Range(toRng)
Range(toRng) = tmpVal
Application.ScreenUpdating = True
End Sub


provalo...preso online.
Molto spesso io risolvo sempre con il VBA. Pure il CERCA.ORIZZ, ad esempio, non l'ho mai capito come cazzo si usa e quando mi serve cercare qualcosa mi butto giù due righe di codice. Tanto il VBA è facilissimo

[GenghisKhan]

Tanto il VBA è una merda

fix

[Nightgaunt]

Non sono un informatico, per me quel testo è tratto dal Necronomicon.

Dimmi solo dove lo devo incollare :asd:

[KymyA]

o merda... allora, siccome manco io ricordo come "evocare" il VBA, parto da un foglio vuoto; poi faccio REGISTRA MACRO e scrivo CIOLA. Poi stoppo la macro e vado a modificarla.
Così parte il VBA editor. Indi cancello la macro registrata perché non serve ad una mazza ed inserisco il codice nella parte dedicata ai MODULI .bas

Poi la mia semplice function la potrai usare come le altre funzioni di excel. E funziona perché l'ho usata mille volte

[KymyA]

fix

FACILISSIMO non esclude che sia una MERDA

[Nightgaunt]

Ok provo su un foglio a casa appena ho tempo, perché che se sputtano qualcosa qui finisce che l'Italia in una settimana diventa il prossimo film di Mad Max.

[Metatron]

elamadonna

[WhiteMason]

Up perché voglio provarlo, e per ricordarmi di installare Office

Inviato dal mio 77X utilizzando Tapatalk

[KymyA]

potrei anche preparare direttamente il file xlsm ed uploadarlo da qualche parte, se siete proprio a zero.
Il fatto è che potrei anche nasconderci un virus e nel momento in cui cliccate ATTIVA CONTENUTO vi si imputtana il pc.

[Nightgaunt]

Vabbè mi accontento del punto 1, ho parlato con il tecnico e mi ha detto che se provo a salvare un excel con la macro il sistema mi blocca per ragioni di sicurezza e poi per sbloccarlo deve venire direttamente il ministro da Roma.

[WhiteMason]

Magic Italy, maybe?

Inviato dal mio 77X utilizzando Tapatalk

[ZTL]

PRIMA LEGGITI QUESTO

https://i.imgur.com/WghWdGN.jpg

[KymyA]

PRIMA LEGGITI QUESTO

https://i.imgur.com/WghWdGN.jpg

Com'è andata a finire? Ci siamo estinti o no? Siamo sopravvissuti?