Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1865 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Problème range paramètré

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Problème range paramètré

n°2134903
mike11210
Posté le 04-04-2012 à 17:25:31  profilanswer
 

Bonjour,
J'essaye de paramètrer un range en fonction d'une variable, pour faire du Range("CT14,CT18" ) mais je rame à trouver une syntaxe correcte.
 
Dim i As Integer
i = 38
    Range("CT14" ).Select
    Selection.AutoFill Destination:=Range("CT14:"CT'&i" ), Type:=xlFillDefault
    Range("CT14:CT38" ).Select
 
Si quelqu'un peut m'aider, ce serait sympa.
Merci d'avance.
 
Mike

mood
Publicité
Posté le 04-04-2012 à 17:25:31  profilanswer
 

n°2134946
vave
♫ Revolution is my name ♫ ★★
Posté le 05-04-2012 à 07:03:01  profilanswer
 

Bonjour,
essayes comme ça :

Code :
  1. Selection.AutoFill Destination:=Range("CT14:CT" & i), Type:=xlFillDefault


---------------
Bel ours Vave, je me dois de l’admettre. -Skyl"win"-  Mais toi tu es intelligent -Homerde- - Ce génie -SkylWINd- JDD S16M72 10:43:46 GMT-DTC +1
n°2134970
mike11210
Posté le 05-04-2012 à 09:46:58  profilanswer
 

Ca ne marche pas ..
J'obtient "la methode range de l'objet global a echoué"
 
Merci quand même
 
Plus exactement, ça marche, mais pas dans autofill.


Message édité par mike11210 le 05-04-2012 à 09:55:11
n°2134979
mike11210
Posté le 05-04-2012 à 10:19:57  profilanswer
 

Dim nbligne As Integer
Dim nbcol As Integer
'nbligne = Cells(1, 4)
nbligne = 38
nbcol = Cells(1, 3)
Range("CT14:CT" & nbligne).Select
 
Selection.autofill Destination:=Range(Cells(14, nbcol), Cells(nbligne, nbcol)), Type:=xlFillDefault

n°2135002
vave
♫ Revolution is my name ♫ ★★
Posté le 05-04-2012 à 11:24:40  profilanswer
 

Tu veux copier la formule de CT14 vers le bas ?
 
Si c'est ça, il faut sélectionner CT14 seulement :

Code :
  1. Dim nbligne As Integer
  2. Dim nbcol As Integer
  3. 'nbligne = Cells(1, 4)
  4. nbligne = 38
  5. nbcol = Cells(1, 3)
  6. Range("CT14" ).Select
  7. Selection.AutoFill Destination:=Range(Cells(14, nbcol), Cells(nbligne, nbcol)), Type:=xlFillDefault



---------------
Bel ours Vave, je me dois de l’admettre. -Skyl"win"-  Mais toi tu es intelligent -Homerde- - Ce génie -SkylWINd- JDD S16M72 10:43:46 GMT-DTC +1

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Problème range paramètré

 

Sujets relatifs
Problème virgule TVA sur les facturesprobleme repetition requette sql
Problème pour mise en place d'un jeux en phpProblème paramètres ADDTHIS - boutons de partage
Silverlight C# problème WrappanelProbleme de position de DIV une ptite aide svp
Problème de liaison wikimedia/wikimindmap[RESOLU] Problème de cration de tableau avec ExtJS 4
[XML] Problème avec formulaire envoi 
Plus de sujets relatifs à : Problème range paramètré


Copyright © 1997-2018 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR