URGENT VBA excel userform.carte

icephenix Messages postés 50 Date d'inscription   Statut Membre Dernière intervention   -  
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention   -
bonjour,
j'ai cette petite macro
Option Explicit

Const conom = "A"
Const DossierCartes = "D:\CONTACT\contact saidi\CARTE VISITE\"    ' nom du dossier à adapter

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim nom As String
If Not Intersect(Target, Columns(conom)) Is Nothing Then
  nom = Target.Value
  UserForm1.Caption = nom
  With UserForm1.Carte
    .Top = 0
    .Left = 0
    .Width = UserForm1.Width
    .Height = UserForm1.Height
    .Picture = LoadPicture(DossierCartes & nom & ".jpg")
  End With
  UserForm1.Show
  Target.Offset(0, 1).Select
End If
End Sub


ca marche quand il sagit d'un fichier excel 2003 mais quand j'ouvre un nouveau classeur 2013 je fait tu copier coller la il me dit erreur et s'est dans "WITH USERFORM1. CARTE" que point carte et selectioné en bleu avec la 1er ligne "private sub........" en jaune
y t'il une méthode de remplacement merci beacoup
A voir également:

3 réponses

icephenix Messages postés 50 Date d'inscription   Statut Membre Dernière intervention  
 
voila le fichier que j'ai reçu avec la macro "MERCI A CCM81"
le problème est que je n'arrive pas a copier le code dans d'autre page je dois toujours coller mes donnée dans ce même fichier .
https://www.cjoint.com/c/EJymJRmCBEo
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Pas tres clair,
copier le code dans d'autre page

et

coller mes donnée dans ce même fichier
0
Utilisateur anonyme
 
Bonjour, j'ai édité ton message pour y ajouter la coloration syntaxique.

D'autre part, merci de ne pas oublier que ce site est annimé par des bénévoles et que ce qui urgent pour nous n'est sûrement pas de répondre à une question.

Si on espère trouver de l'aide gratuite sur un forum, quel qu'il soit, la première chose à apprendre est la patience

0
cs_Le Pivert Messages postés 7904 Date d'inscription   Statut Contributeur Dernière intervention  
 
Bonjour,

je dois toujours coller mes donnée dans ce même fichier .


Ce code fonctionne

Si tu veux coller ce code dans un autre classeur, il faut y mettre ton UserForm aussi avec le contrôle image. Le code et l'UserForm sont lié!

0