Le portail francophone de la géomatique

gaellemothe · Mon 20 February 2012 17:15

Bonjour,

Tout est dans le titre ou presque

j'essaie de calculer les valeurs d'un champ à partir des valeurs d'un autre. Pour éviter de faire x requetes attributaires puis de calculer les valeurs pour les enregistrements sélectionnés, j'aimerais le faire en une seule fois grace à un petit code VBA.

voilà ce que rentre, mais ça ne marche pas ... "erreur lors de l’exécution du code vba : fin d'instruction attendue"
je sèche ...

Code:

Pour le champ BRUIT
-----------------------------------

Dim intBruit as integer
Select Case [SOURCE]
Case "Route"
intBruit = 50
Case "Voie ferrée"
intBruit = 60
Case "Chemin"
intBruit = 5
End Select
-------------------------------
BRUIT = 
intBruit

-----------------------------

merci !!

Spacejo · Mon 20 February 2012 17:19

Salut,

As tu essayé comme ceci:

Code:

Dim intBruit as integer
Dim Source as string
Source = [SOURCE]

If Source = "Route" then
intBruit = 50
ElseIf Source = "Voie ferrée" then
intBruit = 60
ElseIf Source = "Chemin" then
intBruit = 5
End If
__esri_field_calculator_splitter__
intbruit

A copier dans le bloc note et à renommer en .cal si tu veux l'utiliser directement depuis la calculette avec "Charger"
A+
Joël

gaellemothe · Mon 20 February 2012 17:30

Merci pour la réactivité !!

je viens de tester mais malheureusement, même chose, même erreur ....
???

Spacejo · Mon 20 February 2012 17:35

La calculette a t'elle fait le boulot? (celà arrive des fois d'avoir le message d'erreur mais le boulot est fait)
As tu essayé d'enregistrer le code avec le bloc note puis de le renommer avec comme extension .cal (comme je le précise ci dessus)
Sinon peux tu me donner plus de précisions

gaellemothe · Mon 20 February 2012 17:48

je n'avais pas testé comme ça (avec le .cal)
et non la calculette ne fait pas (son) boulot !

mais ça me donne avec le .cal

erreur : caractère incorrect
dû à un pb de codage du fichier txt source ???

Dernière modification par gaellemothe (Mon 20 February 2012 17:49)

carteq · Mon 20 February 2012 20:26

Avez-vous essayé de supprimer le "é" dans "voie ferrée" ?

gaellemothe · Mon 20 February 2012 20:56

merci,
je viens d'essayer et .... non tjs pas, ça ne fonctionne pas.

Spacejo · Tue 21 February 2012 12:15

Peux tu nous poster un extrait de ta table (si ce n'est pas confidentiel)
A+
Joël

Communauté	Ressources	L'emploi	Le marché	L'association	Fils RSS
Forum Blogs Wiki Planet Sites amis	Agenda Biblio Fiches AMO-CNIG Paris PCGIS Téléchargements	Offres d'emploi Banque de CV Formations Démarche Métiers	Geo-Entreprises Geo-Communiqué Appels d'offres	L'association Qui sommes-nous ? Nous aider Bienfaiteurs Partenaires Historique Statuts	Tout le site Job Géomatique Services GeoBlogs ...	Faire un don Mentions légales

Le portail francophone de la géomatique

#1 Mon 20 February 2012 17:15

Erreur lors de l'execution du code vba : fin d'instruction attendue

Code:

#2 Mon 20 February 2012 17:19

Re: Erreur lors de l'execution du code vba : fin d'instruction attendue

Code:

#3 Mon 20 February 2012 17:30

Re: Erreur lors de l'execution du code vba : fin d'instruction attendue

#4 Mon 20 February 2012 17:35

Re: Erreur lors de l'execution du code vba : fin d'instruction attendue

#5 Mon 20 February 2012 17:48

Re: Erreur lors de l'execution du code vba : fin d'instruction attendue

#6 Mon 20 February 2012 20:26

Re: Erreur lors de l'execution du code vba : fin d'instruction attendue

#7 Mon 20 February 2012 20:56

Re: Erreur lors de l'execution du code vba : fin d'instruction attendue

#8 Tue 21 February 2012 12:15

Re: Erreur lors de l'execution du code vba : fin d'instruction attendue

Pied de page des forums