Fonction ou Sub VBA dans rapport EP
Modérateurs: Super-Apogea, Super Modérateur
2 messages
|Page 1 sur 1
Fonction ou Sub VBA dans rapport EP
Bonjour,
j'aimerais savoir si à l'instar d'Excel et d'Access on peut crée des fonctions publiques utilisables directement dans les rapports qu'on crée.
Ex: j'ai une colonne ref article, une colonne designation, une troisieme colone appellant/contenant ma fonction SiImgExiste qui va utiliser les arguments ref article et designation à chaque ligne.
Si oui est ce que la syntaxe pour utiliser la fonction diffère d'Access ?
A tout hasard voici la fonction que j'aimerais intégrer dans les Editions pilotees:
Merci d'avance
j'aimerais savoir si à l'instar d'Excel et d'Access on peut crée des fonctions publiques utilisables directement dans les rapports qu'on crée.
Ex: j'ai une colonne ref article, une colonne designation, une troisieme colone appellant/contenant ma fonction SiImgExiste qui va utiliser les arguments ref article et designation à chaque ligne.
Si oui est ce que la syntaxe pour utiliser la fonction diffère d'Access ?
A tout hasard voici la fonction que j'aimerais intégrer dans les Editions pilotees:
- Code: Tout sélectionner
Public Function SiImgExiste(strCodeProd As String, NomDuChemin As String) As String
On Error GoTo Fin
'Déclarations des variables nécessaires à l'utilisation de la fonction vba.
chemin = "C:\Images Donnees FTP\IMAGES DONNEES FTP\"
NomFichJpg = Dir(chemin & strCodeProd & ".jpg")
NomFichGif = Dir(chemin & strCodeProd & ".gif")
NomFichBmp = Dir(chemin & strCodeProd & ".bmp")
NomFichPng = Dir(chemin & strCodeProd & ".png")
If NomFichJpg = "" Then
If NomFichBmp = "" Then
If NomFichPng = "" Then
If NomFichGif = "" Then
'Renseigner une image par defaut ?
SiImgExiste = ""
Else
SiImgExiste = chemin & strCodeProd & ".gif"
End If
Else
SiImgExiste = chemin & strCodeProd & ".Png"
End If
Else
SiImgExiste = chemin & strCodeProd & ".Bmp"
End If
Else
SiImgExiste = chemin & strCodeProd & ".jpg"
End If
End Function
Merci d'avance
- Posteur néophyte
- Messages: 12
- Inscription: Mer 11 Fév 2015 16:01
Re: Fonction ou Sub VBA dans rapport EP
Bonjour,
Vieux message, mais bon...
EP n'a pas la syntaxe VBA et pour m'y être confronté, très difficile à gérer.
J'ai essayé en passant par du VB encapsulant BO, sans bons résultats.
Cordialement,
Vieux message, mais bon...
EP n'a pas la syntaxe VBA et pour m'y être confronté, très difficile à gérer.
J'ai essayé en passant par du VB encapsulant BO, sans bons résultats.
Cordialement,
ASR31
En recherche de missions.
En recherche de missions.
2 messages
|Page 1 sur 1
Qui est en ligne
Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 0 invités