Macro automatique

pitive35 Messages postés 75 Date d'inscription Statut Membre Dernière intervention -
pitive35 - 15 août 2014 à 17:20

Bonjour à tous,

J'ai enregistrer une macro valeur cible :
Sub Temp_AE_Plaques()
'
' Temp_AE_Plaques Macro
'

'
Range("AP20:AQ20").Select
ActiveCell.FormulaR1C1 = "1"
Range("AP21").Select
Range("AR20").GoalSeek Goal:=100, ChangingCell:=Range("AP20")
End Sub

J'aimerais que la macro s'exécute uniquement avec une condition.
La condition lorsque la cellule DEF 18 (cellules fusionnées) = à plaques

Je pense que ce n'est pas très compliquée mais à part enregistrer des macros, je ne sais pas utiliser VBA.

MErci d'avance pour votre aide

Afficher la suite

A voir également:

Macro automatique
Réponse automatique thunderbird - Guide
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Recherche automatique des chaînes ne fonctionne pas - Guide
Logiciel de sauvegarde automatique gratuit - Guide
Sommaire automatique word - Guide

2 réponses

Réponse 1 / 2

Patrice33740 Messages postés 8561 Date d'inscription Statut Membre Dernière intervention 1 780

Bonjour,

Essaies :

Sub Temp_AE_Plaques()
' Temp_AE_Plaques Macro
  If Range("D18").Value = "à plaques" Then
    Range("AP20").FormulaR1C1 = "1"
    Range("AR20").GoalSeek Goal:=100, ChangingCell:=Range("AP20")
  End If
End Sub

Réponse 2 / 2

pitive35

Bonjour,

Merci beaucoup, j'essaierais en début de semaine prochaine, je n'ai pas le tableau sur ce PC

Votre réponse