Macro Excel -> ajouter un caractère dans une cellule

Macro Excel -> ajouter un caractère dans une cellule - VB/VBA/VBS - Programmation

Marsh Posté le 23-05-2012 à 13:15:29    

Bonjour
Je me permets de poster ici car j'ai un souci avec un document Excel
J'ai un fichier qui représente une fiche de réception d'appareil dans laquelle j'ai 4 colonnes :  
 
Dans la première colonne, je remplirai une cellule sur 2 en flashant un code barre et dans cette cellule il faudrait par une macro que j'ajoute une "*" devant et derrière le texte inscrit.
 
De ce fait ce sera la même chose pour les autres colonnes
 
donc serait il possible par la macro demandée au dessus de rajouter les caractères sur la ligne complète
 
Mes lignes concernées : 10.12.14.16.18.20.22.24.26.28.30.32.34.36 et 38
 
J'ai trouvé des macros qui le faisait sur une colonne complète mais je n'arrive pas à l'adapter à mon projet
 
Merci d'avance
 
cordialement

Reply

Marsh Posté le 23-05-2012 à 13:15:29   

Reply

Marsh Posté le 23-05-2012 à 18:11:01    

Il faut que tu testes le numéro de ligne de ta cellule active :


Dim NoLigne as Integer
NoLigne=activecells.rows
Select Case NoLigne
  Case 10, 12, 14, 16, etc.
     Faire l'action
End Select


Je n'ai pas Excel à disposition (je poste de mon portable Ubuntu) donc je ne peux pas te donner la syntaxe exacte, mais c'est quelque chose dans ce goût là.
 
Il faudrait que tu poste le code que tu utilise déjà pour qu'on puisse t'aider un peu plus.


---------------
OtObOxBlOg - - - Etre seul à avoir tort  c'est plus difficile, mais c'est bien plus beau que d'avoir raison avec une bande de cons
Reply

Marsh Posté le 25-05-2012 à 12:23:57    

Bonjour je te remercie de ta réponse rapide mais entre temps j'ai trouvé une solution à mon problème
 
voici la macro :  
Sub ETOILECODEBARRE()
Dim I As Long
    For I = 10 To 38 Step 2
        Cells(I, "A" ).EntireRow.NumberFormat = """*""@""*"""
    Next
End Sub
 
Merci encore
cordialement

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed