Astuces Excel
  1. Astuces Excel
  3. Collez les valeurs au lieu de la formule
Intereting Posts
Trouver des lignes par rapport à la valeur de la ligne courante dans Excel (DAX) Iterate code pour append un hyperlink avec excel vba Do Until Loop ne s'arrête pas lorsque l'état est rempli vérifier si un file avec l'en-tête est vide Génération de rapport avec plusieurs filters fonctionnant uniquement sur un filter Comment automatiser une feuille de calcul afin que la modification d'une valeur dans une cellule permette à cette ligne entière d'apparaître dans un onglet distinct de la feuille de calcul? Comment passer les parameters de sélection pour RSAQ_REMOTE_QUERY_CALL désinfecte une sortie xml générée de php Comment mettre en surbrillance le ruban dans Excel? Lier correctement une formule de critères multiples à une autre feuille de calcul faire tesortings en vba Formatez les colonnes dynamicment sur Workbook.OpenText en utilisant FieldInfo dans VBA Fonction Excel pour calculer la différence de date par paire Comment merge et append des valeurs dans une colonne de csv si toutes les autres colonnes sont identiques? Obtenir le contenu d'un dossier sharepoint avec Excel VBA

Collez les valeurs au lieu de la formule

Ce que je veux faire, c'est copyr la valeur dans la cellule I6 dans Sheet1 et la coller dans une ligne spécifique (en fonction de la correspondance) dans Sheet2. Cependant, mon code actuel colle la formule au lieu de la valeur: 

Private Sub CommandButton1_Click() rowNum = Application.WorksheetFunction.Match(Cells(6, 6), Sheets("Sheet2").Range("A6:A100"), 0) Sheets("Sheet1").Cells(7, 9).Copy Destination:=Sheets("Sheet2").Cells(rowNum + 5, 9) End Sub

Une idée de ce que je fais mal?

Remplacez la dernière ligne par ceci: 

 Sheets("Sheet2").Cells(rowNum + 5, 9) = Sheets("Sheet1").Cells(7, 9).Value