Notifiche via email alla modifica di una specifica colonna di excel

Question

Buongiorno,

in un file condiviso in SharePoint e' possibile impostare una regola che manda una mail ad un gruppo di persone quando una sepcifica colonna e' modificata?

nello specifico vorremmo ricevere una notifica quando viene cambiata la colonna Priority dell'immagine sotto

grazie per l'aiuto

Answer 1

Grazie Norman,

con send funziona e invia direttamente la mail.

Per quanto riguarda l'invio da web, non so quale versione di Office 365 abbiamo.

tra le app a disposizione abbiamo power automate e ricordo che un mio ex collega era riuscito a collegare l'invio di una mail con excel ma non so se si riesce a fare con una colonna precisa.

Answer 2

Ciao Donatella,

[...]

per farla del tutto autoamtica vorrei che il messaggio partisse direttamente senza aprire una la mail prima dell'invio.

Basta sostituisci l'istruzione

   .Display '.Send

con:

     .Send

Ho utilizzato l'istruzione Display semplicemente per consentire il controllo dell'e-mail prima della sua spedizione. Poiché questo passaggio intermedio non è necessario, sostituisci l'istruzione come suggerito sopra.

ho copiato il codice e funziona se lo provo da app excel, il problema e' che questo file e' condiviso in Sharepoint e alcuni utenti lo compilano dal browser

forse da sharepoint e usando excel dal browser non funziona?

Purtroppo VBA non funzionerà con la versione online di Excel. Sebbene sia forse possibile sfruttare JavaScript (o piuttosto TypeScript, che è un superset di JavaScript) insieme a Office Automate, credo che questa funzionalità sia attualmente disponibile solo con le seguenti versioni di Excel:

• Office 365 Business
• Office 365 Business Premium
• Office 365 ProPlus
• Office 365 ProPlus for Devices
• Office 365 Enterprise E3
• Office 365 Enterprise E5
• Office 365 A3
• Office 365 A5

===

Regards,

Norman

Answer 3

Grazie Norman,

ho copiato il codice e funziona se lo provo da app excel, il problema e' che questo file e' condiviso in Sharepoint e alcuni utenti lo compilano dal browser, inoltre per farla del tutto autoamtica vorrei che il messaggio partisse direttamente senza aprire una la mail prima dell'invio.

forse da sharepoint e usando excel dal browser non funziona?

grazie

Donatella

Answer 4

Ciao Dropje_30,

in un file condiviso in SharePoint e' possibile impostare una regola che manda una mail ad un gruppo di persone quando una sepcifica colonna e' modificata?

nello specifico vorremmo ricevere una notifica quando viene cambiata la colonna Priority dell'immagine sotto

Prova qualcosa del genere:

• Fai clic dx sulla linguetta del foglio di interesse
• Seleziona l'opzione Visualizza Codice dal **** menu contestuale risultante
• Incolla il seguente codice:

'========>>

Option Explicit

'-------->>

Private Sub Worksheet_Change(ByVal Target As Range)

Dim oTabella As ListObject 

Dim Rng As Range 

Const sTabella As String = **"Tabella1"                                                                                             '<<=== Modifica** 

Set oTabella = Me.ListObjects(sTabella) 

Set Rng = Intersect(oTabella.ListColumns(sColonna).Range, Target) 

If Not Rng Is Nothing Then 

    Call Tester(Rng) 

End If 

End Sub

'<<========

• Alt+IM per inserire un nuovo modulo di codice
• Nel nuovo modulo vuoto, incolla il seguente codice:

'========>>

Option Explicit

Public Const sColonna As String = "Priority"

'--------->>

Public Sub Tester(r As Range)

Dim oOutlook As Object 

Dim oMail As Object 

Const sEmail As String = \_ 

  "**pippoCHIOCCIOLAgmail.com,PlutoCHIOCCIOLAgmail.com,PaperinoCHIOCCIOLAgmail.com"       '<<===Modifica** 

Const sOggetto As String = **"Modifica di Prority!"                                                                                      '<<===Modifica** 

Const sCorpo As String \_ 

    = **"Le seguente celle nella colonna " & sColonna & " sono state modificate: "                                  '<<===Modifica** 

Set oOutlook = CreateObject("Outlook.Application") 

Set oMail = oOutlook.CreateItem(0) 

On Error Resume Next 

With oMail 

    .to = sEmail 

    .CC = "" 

    .BCC = "" 

    .Subject = sOggetto 

    .Body = sCorpo & r.Address(0, 0)              

    .Attachments 

    .Display    '.Send 

End With 

On Error GoTo 0 

XIT:

Set oMail = Nothing 

Set oOutlook = Nothing 

End Sub

'<<=========

• Alt+Q per chiudere l'editor di VBA e tornare a Excel.
• Salva il file con l'estensione xlsm

Potresati scaricare il mio file di prova Dropje20231222.xlsm

A causa di un problema con l'attuale editor del forum, che inserisce righe vuote indesiderate nel codice copiato dal forum, suggerirei di copiare il mio codice direttamente dal mio file di prova.

===

Regards,

Norman