Quelle est la différence entre dim et mis en vba

Pardonnez-moi comme je suis un débutant en VBA.

Parfois j'utilise

Dim r as Range
r = Range("A1")

D'autres fois je utiliser

Set r = Range("A1")

Quelle est la différence? Et quand dois-je utiliser quoi?

InformationsquelleAutor |

69

Il n'y a pas de raison d'utiliser set à moins que, se référant à un objet de référence. Il est recommandé de ne l'utiliser que dans ce contexte. Pour tous les autres types de données simples, il suffit d'utiliser l'opérateur d'affectation. C'est une bonne idée de dim (dimension) TOUTES les variables cependant:

Des exemples de types de données simples serait integer, long, boolean, string. Ce sont juste des types de données et n'ont pas leurs propres méthodes et propriétés.
```
Dim i as Integer
i = 5

Dim myWord as String
myWord = "Whatever I want"
```
Un exemple de object serait un Range, un Worksheet, ou un Workbook. Ceux-ci ont leurs propres méthodes et propriétés.
```
Dim myRange as Range
Set myRange = Sheet1.Range("A1")
```
Si vous essayez d'utiliser la dernière ligne sans Set, VB lèvera une erreur. Maintenant que vous avez une object déclaré vous pouvez accéder à ses propriétés et méthodes.
```
myString = myRange.Value
```
- Puis-je s'il vous plaît savoir qui tutoriel ou un livre vous référez-vous à comprendre?
- Cette réponse n'a pas vraiment d'expliquer le "pourquoi"
- VBA est très intelligent, il ne vous obligent pas à dire ce que l'enfer vous êtes en train de faire comme beaucoup de langues. Toutefois, cela ajoute du temps. Si vous utilisez un ensemble de dimensions différentes sur toutes sortes de différentes variantes il ajoute ensuite le temps. Si vous dites à VBA à quoi s'attendre quand il voit une variable alors qu'il n'a pas à s'en sortir. Aussi, si vous dites VBA qu'une variable est un entier qui n'est pas une chaîne, il ne prendra pas autant de RAM. Bien que ce dernier point est probablement pas aussi valable en commun de petits projets VBA, il est toujours bon de codification de la pratique.
- est-il acceptable d'utiliser Set sans Diming la variable en premier?
InformationsquelleAutor
59
- Dim déclare la variable.
```
Dim r As Range
```
- Set configure la variable à un objet de référence.
```
Set r = Range("A1")
```
Cependant, je ne pense pas que ce est ce que vous êtes vraiment se poser.
J'utilise parfois:
```
    Dim r as Range
    r = Range("A1")
```
Cela ne marchera jamais. Sans Set vous recevrez erreur d'exécution #91 variable Objet ou variable bloc with non définie. C'est parce que vous doit utilisation Set pour affecter une variable la valeur d'un objet de référence. Ensuite, le code ci-dessus sera travail.

Je pense que le code ci-dessous illustre ce que vous êtes vraiment demande. Supposons que nous n'avons pas déclarer un type et laissez r être un Variant type à la place.
```
Public Sub test()
    Dim r
    debug.print TypeName(r)

    Set r = Range("A1")
    debug.print TypeName(r)

    r = Range("A1")
    debug.print TypeName(r)
End Sub
```
Donc, examinons ce qui se passe ici.
1. r est déclarée comme une Variante
```
`Dim r` ' TypeName(r) returns "Empty", which is the value for an uninitialized variant
```
2. r est définie à l' Range contenant la cellule "A1"
```
Set r = Range("A1") ' TypeName(r) returns "Range"
```
3. r est définie à l' valeur de la par défaut de la propriété de Range("A1").
```
r = Range("A1") ' TypeName(r) returns "String"
```
Dans ce cas, la propriété par défaut d'un ensemble est .Value, de sorte que les deux lignes de code suivantes sont équivalentes.
```
r = Range("A1")
r = Range("A1").Value
```
Pour en savoir plus sur par défaut des propriétés de l'objet, veuillez consulter Puce de Pearson "Membre par Défaut de la Classe".

Comme pour votre Set exemple:
D'autres fois je utiliser
```
Set r = Range("A1")
```
Ceci ne fonctionnerait pas sans déclarer d'abord que r est un Range ou Variant objet... à l'aide de la Dim de l'instruction, sauf si vous n'avez pas Option Explicit activé, ce qui devrait. Toujours. Sinon, vous êtes à l'aide des identifiants que vous n'avez pas déclaré, et elles sont toutes déclarées implicitement que Variantes.
- Excellente réponse
- Oui 🙂 c'est y compris les références d'origine pour Dim et Set
- vous ne savez pas si vous êtes au courant, mais le langage VBA ref est maintenant maintenu sur github. github.com/OfficeDev/VBA-content/blob/master/VBA/...
- Je n'étais pas au courant (je suis nouveau sur vb*), merci pour l'ajout de cette note.
- Vous êtes les bienvenus @Loup. Je sais que le VBA & ancien VB6 docs peuvent être difficiles à trouver ces jours-ci.
InformationsquelleAutor
7

Dim: vous êtes à la définition d'une variable (ici: r est une variable de type Range)

Jeu: vous êtes à la définition de la propriété (ici: définir la valeur de r pour Range("A1") - ce n'est pas un type, mais une valeur).

Vous devez utiliser ensemble avec des objets, si r sont de type simple (par exemple, int, string), alors il suffit d'écrire:
```
Dim r As Integer
r=5
```
- Ne serait-ce pas la dernière ligne doivent être Dim r as Integer: r=5 ou un saut de ligne? Ne pensez pas que vous pouvez varier et de les assigner comme ça en VBA. - edit: Viens de remarquer que l'âge de ce post. Va laisser un commentaire ici car il est encore valide si
InformationsquelleAutor Tobias Schittkowski
4

Dim simplement déclare la valeur et le type.

Set assigne une valeur à la variable.

InformationsquelleAutor Justin Niessner
1

Si une variable est définie comme un objet, par ex. Dim myfldr Comme Dossier, il est affecté d'une valeur à l'aide du mot-clé, "Set".

InformationsquelleAutor
1

Dim est court pour la Dimension et est utilisé dans VBA et VB6 pour déclarer les variables locales.

Situé sur l'autre main, n'a rien à voir avec les déclarations de variables. Le Set mot-clé est utilisé pour attribuer une variable objet d'un nouvel objet.

Espère que précise la différence pour vous.

InformationsquelleAutor

Fonction à l'aide de VBA sur instruction SET il définit une référence à un objet.donc, si vous modifiez une propriété de l'objet réel sera également modifié.

Dim newObj as Object
Set var1=Object1(same type as Object)
Set var2=Object1(same type as Object)
Set var3=Object1(same type as Object)
Set var4=Object1(same type as Object)
Var1.property1=NewPropertyValue

l'autre Vars propriétés aussi des changements,donc:

Var1.property1=Var2.property1=Var3.property1=Var4.property1=Object1.Property1=NewpropertyValue`

actuellement tous les revendeurs à valeur ajoutée sont les mêmes!

InformationsquelleAutor

Vous devez vous connecter pour publier un commentaire.