ajout/suppression ligne et opération

Question

Bonjour à tous et déjà un grand merci aux éventuelles réponses ;)
Je voudrai, sous VBA, pouvoir ajouter une ligne toutes les 2 lignes a partir d'un fichier Excel puis dans cette nouvelle ligne, faire quelques opérations, telle une conversion binaire d'un nombre qui se touverait alors dans la ligne juste au dessus.
EX:
une ligne avec 6 colonnes ....
-> ajout nouvelle ligne + conversion en binaire de la cellule (1ere ligne / 2eme colonne par exemple)
Etant plus que débutant en prog sous VBA, je ne connais pas trop la syntaxe pour ce genre d'opéarations.

voilà j'espere avoir bien exposé mon problème.
Merci.

cs_Jack · Answer

Il y a une catégorie pour les questions VBA --> Modifiée

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

cs_Jack · Answer

Salut
Voir ma réponse sur la méthode à utiliser dans ton autre question http://www.vbfrance.com/infomsg_SUPPRESSION-LIGNE-SOUS-CONDITION_1033339.aspx#2
Ce qui m'intrigue, c'est ce que tu appelles une "conversion en binaire" : donne un exemple.
Sais-tu le faire à la main ? Alors tu sais le programmer.

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

cs_MPi · Answer

Pour ajouter / supprimer des lignes, il est toujours préférable de commencer par la fin.

For i = DerniereLigne to 2 Step - 1
   ' ... Rows(i).Insert     ' Rows(i).Delete
Next

MPi²

cs_debutantvba · Answer

Merci pour cette réponse MPi²
mais ici DerniereLIgne serait de quel type alors ?
désole ma question est surement stupide mais je prefere demander.

Merci
et ça me donne une idée : y'aurait-il une façon de trouver la dernière ligne ou par exemple il y ait une valeur d'inscrite (tout simplement peut etre trouver la 1ere cellule d'une colonne vide en admettant que les cellules du dessus sont toutes pleines sans exeption ?)

Merci encore.
Un débutant qui risque de rester débutant.

cs_MPi · Answer

Dim DerniereLigne As Long
DerniereLigne = Cells(Rows.Count, "C").End(xlUp).Row

Avec ceci tu auras la dernière ligne contenant des données dans la colonne C

MPi²

cs_Danette · Answer

Info utile, même si j'ai rien demandé, j'ai appris qqchose d'utile.

Ajout/suppression ligne et opération

6 réponses

Votre réponse

Discussions similaires