J'ai copié le code dans un module comme indiqué mais j'ai un plantage à
la ligne suivante : "Function Isembedded(ByVal strEntryID As String, attindex As Integer) As Variant" et comme je n'y comprends pas grand chose, pouvez-vous me dire ce qui cloche. Merci.
Cordialement.
Bonjour,
Est-il possible d'automatiser le classement de pièces jointe dans un
dossier en fonction de l'objet du message.
J'ai copié le code dans un module comme indiqué mais j'ai un plantage à
la ligne suivante : "Function Isembedded(ByVal strEntryID As String,
attindex As Integer) As Variant" et comme je n'y comprends pas grand
chose, pouvez-vous me dire ce qui cloche. Merci.
J'ai copié le code dans un module comme indiqué mais j'ai un plantage à
la ligne suivante : "Function Isembedded(ByVal strEntryID As String, attindex As Integer) As Variant" et comme je n'y comprends pas grand chose, pouvez-vous me dire ce qui cloche. Merci.
Cordialement.
Geo
Est-il possible d'automatiser le classement de pièces jointe dans un dossier en fonction de l'objet du message.
J'ai copié le code dans un module comme indiqué mais j'ai un plantage à la ligne
suivante : "Function Isembedded(ByVal strEntryID As String, attindex As Integer) As Variant" et comme je n'y comprends pas grand chose, pouvez-vous me dire ce qui cloche.
IL y a un message d'erreur ou c'est la ligne qui est en rouge ?
Attention : ceci est un code qui peut vous servir de base, il faut le compléter d'une part en modifiant les registres, d'autre part il faudra programmer la ventilation des pièces jointes en fonction du sujet. Sans doute que c'est plus simple en faisant des règles spécifiques et en donnant un nom différent au premier Sub.
-- A+
Est-il possible d'automatiser le classement de pièces jointe dans un dossier en
fonction de l'objet du message.
J'ai copié le code dans un module comme indiqué mais j'ai un plantage à la ligne
suivante : "Function Isembedded(ByVal strEntryID As String, attindex As Integer) As
Variant" et comme je n'y comprends pas grand chose, pouvez-vous me dire ce qui cloche.
IL y a un message d'erreur ou c'est la ligne qui est en rouge ?
Attention : ceci est un code qui peut vous servir de base, il faut le
compléter d'une part en modifiant les registres, d'autre part il faudra
programmer la ventilation des pièces jointes en fonction du sujet.
Sans doute que c'est plus simple en faisant des règles spécifiques et
en donnant un nom différent au premier Sub.
J'ai copié le code dans un module comme indiqué mais j'ai un plantage à la ligne
suivante : "Function Isembedded(ByVal strEntryID As String, attindex As Integer) As Variant" et comme je n'y comprends pas grand chose, pouvez-vous me dire ce qui cloche.
IL y a un message d'erreur ou c'est la ligne qui est en rouge ?
Attention : ceci est un code qui peut vous servir de base, il faut le compléter d'une part en modifiant les registres, d'autre part il faudra programmer la ventilation des pièces jointes en fonction du sujet. Sans doute que c'est plus simple en faisant des règles spécifiques et en donnant un nom différent au premier Sub.
-- A+
kahmsin
Est-il possible d'automatiser le classement de pièces jointe dans un dossier en fonction de l'objet du message.
J'ai copié le code dans un module comme indiqué mais j'ai un plantage
à la ligne suivante : "Function Isembedded(ByVal strEntryID As String, attindex As Integer) As Variant" et comme je n'y comprends pas grand chose, pouvez-vous me dire ce qui cloche.
IL y a un message d'erreur ou c'est la ligne qui est en rouge ?
Attention : ceci est un code qui peut vous servir de base, il faut le compléter d'une part en modifiant les registres, d'autre part il faudra programmer la ventilation des pièces jointes en fonction du sujet. Sans doute que c'est plus simple en faisant des règles spécifiques et en donnant un nom différent au premier Sub.
J'avais un message d'erreur mais en bidouillant, j'ai réussi à faire ce
que je voulais. Ce sont ces lignes dont j'ignore l'utilité qu'il fallait enlever : Dim oMsg As MAPI.Message Dim oAttachs As MAPI.Attachments Dim oAttach As MAPI.Attachment
Merci pour ton aide. Cordialement. Kahmsin.
Est-il possible d'automatiser le classement de pièces jointe dans un
dossier en fonction de l'objet du message.
J'ai copié le code dans un module comme indiqué mais j'ai un plantage
à la ligne suivante : "Function Isembedded(ByVal strEntryID As String,
attindex As Integer) As Variant" et comme je n'y comprends pas grand
chose, pouvez-vous me dire ce qui cloche.
IL y a un message d'erreur ou c'est la ligne qui est en rouge ?
Attention : ceci est un code qui peut vous servir de base, il faut le
compléter d'une part en modifiant les registres, d'autre part il faudra
programmer la ventilation des pièces jointes en fonction du sujet.
Sans doute que c'est plus simple en faisant des règles spécifiques et en
donnant un nom différent au premier Sub.
J'avais un message d'erreur mais en bidouillant, j'ai réussi à faire ce
que je voulais. Ce sont ces lignes dont j'ignore l'utilité qu'il fallait
enlever : Dim oMsg As MAPI.Message
Dim oAttachs As MAPI.Attachments
Dim oAttach As MAPI.Attachment
J'ai copié le code dans un module comme indiqué mais j'ai un plantage
à la ligne suivante : "Function Isembedded(ByVal strEntryID As String, attindex As Integer) As Variant" et comme je n'y comprends pas grand chose, pouvez-vous me dire ce qui cloche.
IL y a un message d'erreur ou c'est la ligne qui est en rouge ?
Attention : ceci est un code qui peut vous servir de base, il faut le compléter d'une part en modifiant les registres, d'autre part il faudra programmer la ventilation des pièces jointes en fonction du sujet. Sans doute que c'est plus simple en faisant des règles spécifiques et en donnant un nom différent au premier Sub.
J'avais un message d'erreur mais en bidouillant, j'ai réussi à faire ce
que je voulais. Ce sont ces lignes dont j'ignore l'utilité qu'il fallait enlever : Dim oMsg As MAPI.Message Dim oAttachs As MAPI.Attachments Dim oAttach As MAPI.Attachment
Merci pour ton aide. Cordialement. Kahmsin.
Geo
J'avais un message d'erreur mais en bidouillant, j'ai réussi à faire ce que je voulais. Ce sont ces lignes dont j'ignore l'utilité qu'il fallait enlever : Dim oMsg As MAPI.Message Dim oAttachs As MAPI.Attachments Dim oAttach As MAPI.Attachment
C'est qu'il vous manque une référence. Mais si ça marche, c'est le principal.
-- A+
J'avais un message d'erreur mais en bidouillant, j'ai réussi à faire ce que je voulais.
Ce sont ces lignes dont j'ignore l'utilité qu'il fallait enlever : Dim oMsg As
MAPI.Message
Dim oAttachs As MAPI.Attachments
Dim oAttach As MAPI.Attachment
C'est qu'il vous manque une référence.
Mais si ça marche, c'est le principal.
J'avais un message d'erreur mais en bidouillant, j'ai réussi à faire ce que je voulais. Ce sont ces lignes dont j'ignore l'utilité qu'il fallait enlever : Dim oMsg As MAPI.Message Dim oAttachs As MAPI.Attachments Dim oAttach As MAPI.Attachment
C'est qu'il vous manque une référence. Mais si ça marche, c'est le principal.
