Discussion :

[illight]

Désolé pour le titre mais jen'ai pas trouvé mieux
Vu le titre, la question a l'air complètement idiote, et elle l'est et pourtant je trouve pas de solution
Je vous montre la macro vous dirait après ce que je veux faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Sub InsertColumn()
Dim f As Worksheet
Set f = Worksheets("Feuil1")
Columns(NumColonne("Feuil1")).Select
MsgBox (Columns(1, 1).Name)
Selection.Insert Shift:=xlToRight
Selection.AutoFill Destination:=Columns(NumColonne("Feuil1") - 1 & ":" &  NumColonne("Feuil1")), Type:=xlFillDefault
Columns(NumColonne("Feuil1") - 1).Select
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
        False, Transpose:=False
End Sub

Pour information, la fonction NumColonne permet de calculer le numéro de la colonne afin de savoir où insérer ma colonne (pour mon cas par exemple NumCOlonne est égal à 72 je crois )
Ce que je veuxf aire c'est "sélectionner" 2 colonnes pour tirer les formules de la colonne précédente sur la colonne créée mais ça marche pas ocmme ça et je sais pas comment passer par les chiffres
En fait quand je fais la macro par l'assistant il me donne ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
    Columns("BS:BS").Select
    Selection.AutoFill Destination:=Columns("BS:BT"), Type:=xlFillDefault
    Columns("BS:BT").Select

Il utilise les lettres pour dénomer les colonnes

Or moi ce que je veux ce n'est pas utiliser les lettres des colonnes, mais le numéro de la colonne afin de pouvoir l'utiliser dans la procédure au dessus, en sélectionnant 2 colonnes, pour pouvoir tirer mes formules de la colonne précédente (moi avoir été compris ? )


Sinon si vous avez un moyen pour récupérer le "nom" de la colonne, cad la lettre je suis preneur aussi car columns.name ça marche pas (sachant que si je prend le "nom" il faudra quand meme que je puisse prendre la lettre précédente pour tirer mes formules..)

Bref j'aimerai bien savoir comment sélectionner 2 colonnes par leur numéro, et non par leur lettre

J'espère avoir été compris si vous avez des questions hésitez pas

Merci pour votre aide

[chmod777]

pour convertir un chiffre en lettre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

lettre = Chr(96 + i)

où i est le chiffre bien entendu

une fois que tu as ta lettre et bien c'est tout de suite moins compliqué

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Columns("BS:BT").Select
columns("" & lettre & ":" & lettre2 ).select

[illight]

je pense pas que ça marchera, justement parce que c'est BS (par exemple)
SI je fais un chr(96 +i) par exemple, avec i = 72, ça va me faire 188 ça va pas me faire une erreur ?

[SfJ5Rpw8]

par exemple utilise union ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Union(Columns(71), Columns(72)).Select

[AlainTech]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim rRange
Set rRange = Range(Columns(3), Columns(4))

Te permet d'utiliser rRange partout où tu veux invoquer tes 2 colonnes.

Example:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

rRange.Select

Dans ce cas-ci, j'ai mis les colonnes 3 et 4 pour ne pas devoir dérouler toutes ma feuille pour voir ce qui était sélectionné.

[illight]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim rRange
Set rRange = Range(Columns(3), Columns(4))

Te permet d'utiliser rRange partout où tu veux invoquer tes 2 colonnes.

Example:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

rRange.Select

Dans ce cas-ci, j'ai mis les colonnes 3 et 4 pour ne pas devoir dérouler toutes ma feuille pour voir ce qui était sélectionné.

Yep Merci ça marche nickel merci beaucoup

[Masterdidou]

Bonjour,
Je me permets de compléter la question même si ce n'est pas mon sujet, mais à mon niveau je voudrais sélectionner plusieurs lignes comprises entre 2 variables.

donc a défaut je remplace par Line, mais je ne peux pas utiliser les ":" pour préciser que je veux l'ensemble compris entre les deux lignes
Merci d'avance