Astuces Excel
  1. Astuces Excel
  3. comment utiliser des plages variables dans différentes feuilles
Intereting Posts
Utilisation de Google Translate dans une macro Excel VBA Répéter la cellule De l'année à l'année dans les nouvelles colonnes – Excel Créer une tâche asynchronous dans cakephp Comment utiliser getElementsByTagName avec <td> avec overflow: caché sur VBA? Comment puis-je mettre à jour les valeurs dans un Excel en utilisant Java Optimiser les votes électoraux dans une simulation politique … 200 000 possibilités, comment les traverser? Insérez des arrays d'excel au mot un à la fois comme image avec vba Looping à travers la gamme en utilisant VBA dans Excel Existe-t-il un moyen de capturer le contenu des cellules modifiées dans Excel en utilisant VBA? HRESULT: 0x800A03EC – Cela fonctionne sur le problème de ma machine lors de la création de files Excel La sortie Excel dans pentaho montre le mois dernier Ecrire un dictionary Python à CSV où: keys = colonnes, valeurs = lignes Excel VBA: Erreur d'automation – Appel de procédure à distance échoué Besoin de conseils de design de database pour un système de classment scolaire VBA – IF Non Intersect ne fonctionne qu'une seule fois

comment utiliser des plages variables dans différentes feuilles

J'ai écrit un code pour un produit entre 2 gammes. L'une de ces gammes est dans l'autre et quand j'ai essayé de la rendre variable, je me trompe. C'est le code: 

Sub Correlacionar() Dim col As Integer Dim random As Range Dim SDesv As Range Dim Chole As Range col = 4 Set Chole = Sheet4.Range("a20:d23") 'Set Chole = Sheet4.Range(Cells(20, 1), Cells(19 + col, col)) Set random = Range(Cells(3, 9), Cells(3, 8 + col)) Set SDesv = Range(Cells(10, 1), Cells(10, col)) SDesv = WorksheetFunction.MMult(random, WorksheetFunction.Transpose(Chole)) Application.CutCopyMode = False End Sub

Je veux utiliser: 

 Set Chole = Sheet4.Range(Cells(20, 1), Cells(19 + col, col))

Au lieu de: 

 Set Chole = Sheet4.Range("a20:d23") 

 Set Chole = Sheet4.Range(Sheet4.Cells(20, 1), _ Sheet4.Cells(19 + col, col))

Si vous utilisez simplement Cells, il se référera à la feuille de travail active, pas Sheet4.

Il est recommandé de ne jamais utiliser Range ni Cells sans un qualificatif de feuille de calcul spécifique. Votre code ne doit pas dépendre d'une feuille spécifique active.

Similaire à Ne peut pas fonctionner avec les plages si le classur et la feuille ne sont pas actifs

Les cellules se réfèrent implicitement à ActiveSheet.Cells 

 with sheet4 set Chole = .range(.cells(20,1), cells(19 + cells(19 + col, col)) end with