aide sur la commande ActiveCell.Row + Liens inter - page

aide sur la commande ActiveCell.Row + Liens inter - page - VB/VBA/VBS - Programmation

Marsh Posté le 10-08-2006 à 00:19:12    

bonjour
j ai besoin de vos lumieres sur la commande dans une macro excel
 
Range("A3" ).Select
 
je desirerai mettre une variable pour le n° de ligne
La valeur serait le n° de ligne dans laquelle une cellule est selectionné (tout en gardant la meme colonne (A dans mon cas))
 
pour cela g créé une variable comme ceci
 
Val_numeroligne = ActiveCell.Row
 
mais je ne connais pas la syntaxe
 
Range("A & Val_numeroligne" ).Select
 
?? non ??
 
merci d avance


Message édité par mickeyiec1 le 10-08-2006 à 11:10:42
Reply

Marsh Posté le 10-08-2006 à 00:19:12   

Reply

Marsh Posté le 10-08-2006 à 06:14:08    

bonjour,
utilise :
Range("A" & Val_numeroligne ).Select
A+

Reply

Marsh Posté le 10-08-2006 à 10:57:13    

merci bcp ca marche !!!

Reply

Marsh Posté le 10-08-2006 à 11:07:24    

dans le meme registre, g encore une question
dans la macro g une ligne de ce type qui crée un lien vers la cellule A1 de la page 4
 
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
"'4'!A1"

 
je desirerai conserver cette ligne mais remplacer la page de destination (4 dans mon ex) par la valeur de la cellule sur laquelle je suis
(ex si dans une cellule 562 est inscrit, la commande serait  
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
"'562'!A1" )
 
pour cela j ai creé une variable
Num = ActiveCell.Value
mais si je la place dans la ligne de code
 
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
"'Num'!A1"

 
cela me crée bien un lien mais vers une page nommée Num .... bien sur elle n existe pas
 
pb de syntaxe ?
 
merci d avance


Message édité par mickeyiec1 le 10-08-2006 à 11:08:33
Reply

Sujets relatifs:

Leave a Replay

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