Signaler

Mise en forme image [Résolu]

Posez votre question Juduno - Dernière réponse le 5 juil. 2017 à 11:24 par Juduno
Bonjour,

j'insère mes images comme ceci

 i = 4   
While i < 29
If ActiveSheet.Range("C" & i).Value < ActiveSheet.Range("B" & i).Value - 5 Then
Set objFeuille = ActiveSheet
Set objPict = objFeuille.Pictures.Insert("D:\0 - Services\Industries\CLeanergie\icon classement poste\simley vert.png")
With objPict
.Left = Range("D" & i).Left
.Top = Range("D" & i).Top
End With
End If
If ActiveSheet.Range("C" & i).Value >= ActiveSheet.Range("B" & i).Value - 5 And ActiveSheet.Range("C" & i).Value < ActiveSheet.Range("B" & i).Value - 1 Then
Set objFeuille = ActiveSheet
Set objPict = objFeuille.Pictures.Insert("D:\0 - Services\Industries\CLeanergie\icon classement poste\simley jaune.png")
With objPict
.Left = Range("D" & i).Left
.Top = Range("D" & i).Top
End With
End If
If ActiveSheet.Range("C" & i).Value >= ActiveSheet.Range("B" & i).Value Then
Set objFeuille = ActiveSheet
Set objPict = objFeuille.Pictures.Insert("D:\0 - Services\Industries\CLeanergie\icon classement poste\simley rouge.png")
With objPict
.Left = Range("D" & i).Left
.Top = Range("D" & i).Top
End With
End If
i = i + 1
Wend


donc comme je ne connais pas le nom je ne peux pas supprimer l’arrière-plan

alors voici mes questions :

- comment connaître ou définir un nom par rapport à mon insertion d'image ?
- comment en vba supprimer l'arrière-plan d'une image ?

c'est pas marrant si je savais faire la deuxième question ^^

merci d'avance
Utile
+0
plus moins
première question résolu

faut faire
.Name = "test 1"
Donnez votre avis

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !