[Excel] Aiutate il vostro Paese

Citazione:

---

Originariamente Scritto da kolby

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

---

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

#keynes

Inviato dal mio 77X utilizzando Tapatalk

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

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.

Citazione:

---

Originariamente Scritto da Degauss

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...

Codice:

---

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

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

Inviato dal mio 77X utilizzando Tapatalk

Citazione:

---

Originariamente Scritto da Degauss

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:

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

mo te ne vieni, eh? :D

- - - Aggiornato - - -

Codice:

---

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

Citazione:

---

Originariamente Scritto da KymyA

Tanto il VBA è una merda

---

fix

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

Dimmi solo dove lo devo incollare :asd:

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

Citazione:

---

Originariamente Scritto da GenghisKhan

fix

---

FACILISSIMO non esclude che sia una MERDA

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.

elamadonna

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

Inviato dal mio 77X utilizzando Tapatalk

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.

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.

Magic Italy, maybe?

Inviato dal mio 77X utilizzando Tapatalk

PRIMA LEGGITI QUESTO

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