connaitre la position de la cellule

[roncevaux68]

Bonjour,
après des heures et des heures de recherche je m'en remets à vous pour résoudre mon problème.
Je ne suis pas expert, c'est pourquoi je crée mes programmes VBA en les extrayant de macros que j'enregistre sous Excel.

Bien cordialement
Stephane

 

[Guest]

Re : connaitre la position de la cellule

Bonjour,

Va voir ce fil, c'est la même chose (ou presque). https://www.excel-downloads.com/threads/remplir-colonnes-avec-des-text-differents.168738/

A+

 

[roncevaux68]

Re : connaitre la position de la cellule

non c'est pas la même chose moi ma casse est flottante et des que la chaine est vide cela arrête la macro

 

[Guest]

Re : connaitre la position de la cellule

Bonsoir,

il est de coutume dans ce forum, de commencer TOUS ses post par un signe de politesse ou un simple Re. Les 'merci' sont également appréciés. Alors pour apprendre à rédiger tes demandes je te conseille fortement de lire Lien supprimé

De plus, je ne sais pas ce que tu entends par 'casse'.

En tout cas, j'ai tiré la macro 'remplir' du fichier ci-dessous, de celle que j'avais écrite pour l'autre fil. On est dans un cas de figure similaire.

Lance la macro 'remplir' et tu verras

A+

 

[roncevaux68]

Re : connaitre la position de la cellule

merci mais j'ai pas excel 2010 j'ai que la version 2000 impossible de lire le fichier joint
cordialement

 

[Guest]

Re : connaitre la position de la cellule

Re,

Autant pour moi, j'ai changé le fichier de mon post précédent. tu pourras le télécharger.


A+

 

[roncevaux68]

Re : connaitre la position de la cellule

re:
merci pour ce programme mais je voudrais que la macro arrête des que la chaine est vide .
je m'explique :
je pose le curseur sur la première date (b2) ,j'exécutante la macro et des que le chaine et vide (c8) elle s’arrête sur la casse (b7)

attention je suis en version 2000
cordialement

 

[Guest]

Re : connaitre la position de la cellule

Re,

Dis comme ça c'est autre chose! D'ailleurs pas besoin de macro pour faire ça!

Selectionner B2:B8
F2 puis CTRL+ENTREE

C'est rapide et ça évite les erreurs de macros.

Sub Remplir2()
    Dim derlig As Long
    If ActiveCell = "" Then Exit Sub
    With ActiveCell
        derlig = .Offset(1, 1).End(xlDown).Row
        If derlig = .Parent.Rows.Count Then
            If MsgBox("Dernière ligne détectée: " & derlig & vbCrLf & _
                        "Êtes-vous certain de vouloir remplir jusque là?", _
                        vbQuestion + vbYesNo, "Remplir") = vbNo Then Exit Sub
         End If
        .Resize(derlig - .Row).Value = .Value
    End With
End Sub

A+

 

[roncevaux68]

Re : connaitre la position de la cellule

bonsoir

un grand merci c'est ce que je voulais
a+
cordialement
stephane