Macro excel valeur sur une feuille différente

atr3yyu -  
 atr3yyu -
Bonjour,

ma question est de savoir comment faire pour inserer la valeur correspondante dans une feuille nommé sheet2
voici le code
Sub CommandButton1_Click()

'déclaration des variables

Dim UserName As String
Dim LastRow As Long


'afferctation de valeur

UserName = InputBox("Please key the new user in the form name, firstname: ")

<gras>'saisie des données en cellules sur feuille sheet1 (a transferer sur sheet2)</gras>

LastRow = Range("A65536").End(xlUp).Row + 1
Cells(LastRow, 1).Select
ActiveCell.Value = UserName


End Sub


Merci d'avance pour vos réponses, merci
Configuration: Windows XP Internet Explorer 6.0

1 réponse

  1. atr3yyu
     
    Commencons par les bases : 
    
      
    
    Selection d'une feuille 
    
      
    
    Sheets("NomDeLaFeuille").Select 
    
      
    
    Selection d'une cellule 
    
      
    
    Range("A1).Select 
    
      
    
    Ouverture d'un autre fichier Excel 
    
      
    
    ChDir "Chemin du repertoire du fichier" 
    
        Workbooks.Open Filename:= _ 
    
            " Chemin du repertoire du fichier\fichier.xls " 
    
      
    
    Fermeture d'un fichier   
    
    ActiveWindow.Close pour fermer le fichier en cours
    
    Ou
    
        Workbooks.Close Filename:= _ 
    
            " Chemin du repertoire du fichier\fichier.xls " 


    J'ai trouvé ma réponse, en espérant que ca aidera quelqu'un
    (je cherche pendant 2heures faut que je poste pour que 5 min apres je trouve la rep tout seul...)
    0