Publicité
+ Répondre à la discussion
Affichage des résultats 1 à 4 sur 4
  1. #1
    Invité de passage
    Homme Profil pro Counda Tran
    Étudiant
    Inscrit en
    janvier 2013
    Messages
    18
    Détails du profil
    Informations personnelles :
    Nom : Homme Counda Tran
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : janvier 2013
    Messages : 18
    Points : 3
    Points
    3

    Par défaut fonction ou procédure

    Bonjour ,

    Je suis pas très doué en VBA mais voilà j'ai envie d'optimiser un peu mon code,
    J'utilise du code redondant et pour cela j'aimerais savoir si on peut mettre dans une procédure ou une fonction :
    Code :
    1
    2
    3
    DoCmd.SetWarnings False
    DoCmd.RunSQL SQL
    DoCmd.SetWarnings True
    ?

    Et pour qu'ensuite je puisse faire appel à n'importe quel moment.

    Je vous remerci d'avance pour votre réponse

  2. #2
    Responsable
    Libres & Open source

    Avatar de zoom61
    Homme Profil pro Vincent VIALE
    MOA/MOE & DWH
    Inscrit en
    janvier 2005
    Messages
    6 663
    Détails du profil
    Informations personnelles :
    Nom : Homme Vincent VIALE
    Âge : 41
    Localisation : France, Haute Vienne (Limousin)

    Informations professionnelles :
    Activité : MOA/MOE & DWH
    Secteur : Industrie

    Informations forums :
    Inscription : janvier 2005
    Messages : 6 663
    Points : 39 098
    Points
    39 098

    Par défaut

    Salut,

    Oui. Si ta fonction est faite de cette façon :
    Code :
    1
    2
    3
    4
    5
    Function ExempleSQL (SQL as string)
    DoCmd.SetWarnings False
    DoCmd.RunSQL SQL
    DoCmd.SetWarnings True
    Exit Function
    Ensuite dans ton code tu l'appelles avec :
    Code :
    1
    2
    SQL = "..."
    Call ExempleSQL (SQL)
    @+.
    N'oubliez pas le Tag afin de faciliter la recherche, et en votant cela permet de mieux la cibler.

    Vous souhaitez participer à une des deux rubriques Logiciels Libres & Open source et/ou OpenOffice & LibreOffice ? Contactez-moi.

    Je ne réponds pas aux messages privés s'ils sont liés à une question technique


  3. #3
    Invité de passage
    Homme Profil pro Counda Tran
    Étudiant
    Inscrit en
    janvier 2013
    Messages
    18
    Détails du profil
    Informations personnelles :
    Nom : Homme Counda Tran
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : janvier 2013
    Messages : 18
    Points : 3
    Points
    3

    Par défaut

    Merci de ton post ! Problème résolu !

  4. #4
    Responsable
    Libres & Open source

    Avatar de zoom61
    Homme Profil pro Vincent VIALE
    MOA/MOE & DWH
    Inscrit en
    janvier 2005
    Messages
    6 663
    Détails du profil
    Informations personnelles :
    Nom : Homme Vincent VIALE
    Âge : 41
    Localisation : France, Haute Vienne (Limousin)

    Informations professionnelles :
    Activité : MOA/MOE & DWH
    Secteur : Industrie

    Informations forums :
    Inscription : janvier 2005
    Messages : 6 663
    Points : 39 098
    Points
    39 098

    Par défaut

    N'oublie pas le Tag
    N'oubliez pas le Tag afin de faciliter la recherche, et en votant cela permet de mieux la cibler.

    Vous souhaitez participer à une des deux rubriques Logiciels Libres & Open source et/ou OpenOffice & LibreOffice ? Contactez-moi.

    Je ne réponds pas aux messages privés s'ils sont liés à une question technique


+ Répondre à la discussion
Cette discussion est résolue.

Liens sociaux

Règles de messages

  • Vous ne pouvez pas créer de nouvelles discussions
  • Vous ne pouvez pas envoyer des réponses
  • Vous ne pouvez pas envoyer des pièces jointes
  • Vous ne pouvez pas modifier vos messages
  •