Excel Macro: est-il possible de trouver les hauteurs de lignes et les largeurs de colonnes d'une feuille de calcul?

Question

Existe-t-il un moyen de trouver la hauteur des RANGS de 1 à 50 et la largeur des COLONNES de A à Z dans une feuille Excel sans cliquer et écrire manuellement la réponse?

Remerciements

Michael.

Answer 1

Pour ajouter au-dessus de @Parkyprg

Range("A1:A50").Height  ' height of range 
Range("A:Z").Width   ' width of range 
Range("A1:A50").Rows.Count ' number or rows in range 
Range("A3").Height   ' height of A3 cell 
Range("A3").Width   ' width of A3 cell 

Answer 2

Dans Excel VBA vous pouvez utiliser quelque chose comme ceci:

Range("A1:A50").Height 

et

Range("A:Z").Width 

Answer 3

Dans Excel vba, obtenir une sortie des hauteurs de ligne est facile à itérer en utilisant la propriété rows.height:

Sub outputRowHeight() 
    Dim i As Integer 

    For i = 1 To 50 
     Debug.Print Rows(i).Address & " is : " & Rows(i).Height 
    Next i 

End Sub 

Pour la largeur de la colonne, nous utilisons la propriété columns.width. Il est un peu plus délicat parce que vous ne pouvez pas itérer directement par des lettres de l'alphabet, donc nous avons besoin d'utiliser l'indice à la place:

Sub outputColumnWidths1() 
    Dim i As Integer 

    For i = 1 To 26 '26th letter is Z 
      Debug.Print Columns(i).Address & " is : " & Columns(i).Width 
    Next i 

End Sub 

Si vous voulez éviter d'avoir à connaître l'indice d'une lettre, vous pouvez utiliser une instruction if pour sortir une fois que vous êtes hors de portée:

Sub outputColumnWidths2() 
    Dim i As Integer 

    For i = 1 To 99 'using 99 as arbitrary high end number 
     If Columns(i).Address <> "$AA:$AA" Then 
      Debug.Print Columns(i).Address & " is : " & Columns(i).Width 
     Else 'once we get outside of A-Z, we want to end. 
      Exit For 
     End If 
    Next i 

End Sub 

Cela produira les mêmes résultats que le premier exemple, mais vous pouvez l'étendre à autant de colonnes que vous voulez en se cognant le nombre d'itérations et le nom de la première colonne du premier que vous ne voulez pas évaluer.

Espérons que cela aide!