Re: Invio mail in caso di variazione valore cella
Inviato: mercoledì 9 gennaio 2019, 22:01
ho appena finito di metterlo nel mio file.
Allego (non funziona )
Allego (non funziona )
Forum di supporto degli Utenti per gli Utenti di OpenOffice e LibreOffice
https://forum.openoffice.org/it/forum/
Codice: Seleziona tutto
Sub eventoProva(Target)
If NOT Target.supportsService("com.sun.star.sheet.SheetCell") then exit sub
Sh = Target.getSpreadsheet()
addr = Target.getCellAddress()
rng = sh.getCellRangeByName("D8:AMJ13")
range2 = rng.queryintersection(Target.rangeaddress())
If range2.RangeAddressesAsString = "" Then
Exit Sub
Else
msgbox "cella controllata, puoi inviare avviso"
'call inviaEmailProva
End if
End Sub
Scusate ragazzi forse ho complicato le cose allegando il fileconti2018 ma visto che nel primo post avevo detto cosa volevo fare ho pensato che fossimo sulla strada giusta.epicuzza ha scritto:Buonasera a tutti.
Ho cercato nel forum un caso che mi potesse aiutare ma non ho trovato niente facesse al caso mio, quindi chiedo a voi:
ho bisogno che Calc mi invi una mail in maniera automatica ogni qualvolta il valore di AF2 cambi, non sono interessato ad allegare un file nel mail, mi interessa (se possibile) che la mail mi dica quale cella di quella riga è variata.
Ci tengo a precisare che non mi interessa in che maniera venga inviata la mail, sn disposto a tutto, e che è fondamentale che la mail parta senza bisogno di conferme da parte di chi sta al pc.
vi ringrazio in anticipo, spero di essermi speigato
grazie
Cosa intendi?patel ha scritto:Io risponderò soltanto su un file definitivo
cosi sempre sulle ali dell'entusiasmo allego il mio file (togliendo i dati sensibili) e da li scoppia il finimondo, il motivo a quanto pare è che non vi avevo detto che la cella che mi interessava era una SOMMA quando nel mio primo allegato lo avevo specificato.in pratica è lo stesso file allegato da Bobo, quindi solo un esempio, mi aspettavo il tuo file, quello con cui vuoi controllare il lavoro dei dipendenti, comunque in risposta alla tua domanda
Le basi di programmazione si, l'ho detto diverse volte.bobo779256 ha scritto: Ti si è dato il modo per farlo, macro e altro, ma qua mancano proprio le basi, o almeno così sembra...
Dai, nessun accanimento! Solo qualche richiesta "rude" di chiarimenti, a volte basta poco e non ci si capisce reciprocamente. Ma basta altrettanto poco per tornare in sintonia .epicuzza ha scritto:mi piacerebbe capire il motivo di tutto questo accanimento nei miei confronti
questo è quanto hai detto nel primo post, recentemente io ho detto:epicuzza ha scritto: ho bisogno che Calc mi invi una mail in maniera automatica ogni qualvolta il valore di AF2 cambi, non sono interessato ad allegare un file nel mail, mi interessa (se possibile) che la mail mi dica quale cella di quella riga è variata.
e tu non mi hai minimamente consideratopatel ha scritto:....., se vuoi spedire una mail ogni volta che viene modificata una cella nell colonne da D a AMj si può fare cosìCodice: Seleziona tutto
Sub eventoProva(Target) If NOT Target.supportsService("com.sun.star.sheet.SheetCell") then exit sub Sh = Target.getSpreadsheet() addr = Target.getCellAddress() rng = sh.getCellRangeByName("D8:AMJ13") range2 = rng.queryintersection(Target.rangeaddress()) If range2.RangeAddressesAsString = "" Then Exit Sub Else msgbox "cella controllata, puoi inviare avviso" 'call inviaEmailProva End if End Sub