Les fonction de type crange

aboudmsili Messages postés 4 Statut Membre -  
aboudmsili Messages postés 4 Statut Membre -
Bonjour,
Je vous charger les resultat de variable Crange a la fonction
Ex function ķkkk () as crange
Dim c as crange

Kkkkk=c comment faire ça
Merci d'avance

A voir également:

3 réponses

thev Messages postés 2069 Statut Membre 717
 
Rien à voir avec Excel mais plutôt avec IDL.
1
Raymond PENTIER Messages postés 71825 Statut Contributeur 17 376
 
En effet, c'est un problème de programmation, qui n'a aucun lien avec le tableur de Microsoft ...
Notre nouveau membre, à qui je souhaite la bienvenue, devrait lire ce chapitre de la Charte de CCM : https://www.commentcamarche.net/infos/25843-guide-d-utilisation-du-forum-de-commentcamarche-net/#plateformes-d-assistance
0
aboudmsili Messages postés 4 Statut Membre
 
Non excuse moi c'est un veritable pblm de tableur
C'est un pblm en programation VBA
On peut se pose par autre méthode:
DONNER L'INSTRUCTION QUI TRANSFORME LE CONTENU DE VARIABLE DE TYPE RANGE VERS UNE FONCTION DE TYPE RANGE
0
eriiic Messages postés 25847 Statut Contributeur 7 279
 
Bonjour,

Ah ben pour les devoirs ce n'est pas ici non plus.
Il faut sortir tes cours.
De toute façon cette question ne veut rien dire du tout, on ne transforme pas une variable vers une fonction. Ca doit être ton interprétation.
eric
0
aboudmsili Messages postés 4 Statut Membre > eriiic Messages postés 25847 Statut Contributeur
 
Je suis désolé sur ma langue française est pas bien psq je suis arabophone
En ce qui concerne la transformation c a d ' l'affectation ' pour la précision
J'ai pas des devoires ni des cours je suis amateur et je veux développer mes connaissances en VBA excel
Le pblm autre fois si vous avez une solution:
J'ai un variable de type RANGE
et fonction de meme type comment faire l'affectation
Fonc=var
En vba excel
Merci
0
eriiic Messages postés 25847 Statut Contributeur 7 279
 
A main levée, mais on ne sait pas ce que tu as prévu en passage de paramètre...

Sub test
Dim c as range
set c= xxx("A2:C6")
end sub

Function xxx(adresse as String) as range
   set xxx=sheets("Feuil1").Range(adresse)
end function


En essayant continuellement, on finit par réussir. 
Donc plus ça rate, plus on a de chances que ça marche.(les Shadoks)
En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
0
aboudmsili Messages postés 4 Statut Membre
 
Merci beaucoup
0