Remplacer des vides par un nom sans encombrer toute la feuil

Bonjour à tous

J'ai un fichier avec quelques milliers de lignes d'ordre de fabrication et certaines cellules en colonne D n'ont pas de N° de projet car il s'agit de pièces de stock.

J'ai essayé de remplacer les vides par OF STOCKS, mais le système ne s'arrête pas à ma colonne.

Je pense qu'il n'y a que une solution VBA que je n'arrive pas à créer.

Tester tant que C est différent de rien

Si D est égal à rien, renseigner OF Stocks

sinon ligne suivante

J'espère avoir bien expliqué mon problème.

Je vous joint un petit fichier.

Merci pour votre aide

@+

Robert

Bonjour,

çà devrait suffire

Sub RemplaceVide()
Dim Lg&
    Lg = Range("c" & Rows.Count).End(xlUp).Row
    Range("d3:d" & Lg).Replace What:="", Replacement:="OF Stocks"
End Sub

Amicalement

Claude

Bonjour Claude et le Forum

Merci pour votre aide.

ça fonctionne très bien et je n'aurai pas été capable de trouver seul.

Si je n'abuse, que veut dire lg$ ?

@+

Robert

Bonjour,

Un code différent de Claude dans lequel on teste aussi si C est différent de rien

Sub test()
'Macro Dan pour Bobby71
Dim cel As Range
For Each cel In Range("C3:C" & Range("C" & Rows.Count).End(xlUp).Row)
    If cel > 0 And cel.Offset(0, 1) = "" Then cel.Offset(0, 1) = "OF STOCKS"
Next
End Sub

Code à placer dans un module en VBA et lui associer un bouton éventuellement

Amicalement

re Robert, salut Dan

Dans mon code, je suppose que la colonne "C" n'a pas de vide

ce qui permet d'éviter la boucle de Dan

Dim Lg&

signifie Dim Lg As Long

c'est une déclaration de variable,

ici indique la dernière ligne occupée en colonne "C" (en partant du bas)

Bonne journée

Claude

Merci à tous les deux.

ça fonctionne également très bien Dan.

Je garde vos codes de coté.

Merci

@+

Robert

re et salut Claude

Dans mon code, je suppose que la colonne "C" n'a pas de vide

ce qui permet d'éviter la boucle de Dan

Effectivemment Claude.

Le code que je proposais utilise la boucle car notre bobby signale dans sa demande qu'il faut tenir compte de la colonne C ("Tester tant que C est différent de rien"). Le tout est de savoir à quoi il pensait en écrivant cela.

Pour Boby, si tu es sur que le colonne C est toujours complétée, utilise le code de Claude qui évite la boucle et sera plus rapide.

Dans le cas contraire , tu as la solution que je t'ai proposée.

Bonne APM

Amicalement

Re à vous

J'ai bien une colonne C toujours remplie, donc j'ai opté pour le code de Claude.

C'est pour cette raison que je voulais tester sur cette colonne

@+

Robert

Rechercher des sujets similaires à "remplacer vides nom encombrer toute feuil"