EXCEL VBA VARIABLE DANS RECHERCHEV

Fermé

mimi - 13 déc. 2007 à 13:52
eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 - 13 déc. 2007 à 15:11

Bonjour,

Je veux saisir le nom d'un onglet dans une boite pour récupérer des informations d'un autre onglet avec la fonction "RechercheV" ci- dessous.

onglet = InputBox("Veuillez entrer l'onglet précédent")
ActiveCell.FormulaR1C1 = "=VLOOKUP(R[1]C4,'onglet'!C4:C28,24,FALSE)"

Mais Excel pense que onglet est un nom de fichier. Comment écrire correctement la syntaxe SVP ?

Merci d'avance

A voir également:

Recherche v vba
Recherche automatique des chaînes ne fonctionne pas - Guide
Hyper v download - Télécharger - Divers Utilitaires
Recherche photo - Guide
Recherche adresse - Guide
Je recherche une chanson - Guide

4 réponses

Réponse 1 / 4

eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 256
13 déc. 2007 à 14:04

Bonjour,

essaie avec
ActiveCell.FormulaR1C1 = "=VLOOKUP(R[1]C4," & onglet & "!C4:C28,24,FALSE)"

eric

Réponse 2 / 4

mimi
13 déc. 2007 à 15:00

hélas non, cela ne marche pas
=RECHERCHEV($D4;'& onglet &'!$D:$AB;24;FAUX)

Peut être un problème d'espace à mettre ?

Pourtant ma variable est déclarée " Dim onglet As String"

Merci d'avance pour ton aide

mimi

Réponse 3 / 4

mimi
13 déc. 2007 à 15:11

MERCI ERIC

Ca marche !

J'avais publié les deux guillemets

mimi

Réponse 4 / 4

eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 256
13 déc. 2007 à 15:11

Du coup je viens de tester et ça marche très bien chez moi avec la syntaxe que je t'ai donnée.
Ta feuille existe bien ? pas d'erreur dans son nom ?
essaie ça dans un classeur neuf
Sub test()
Dim onglet As String
onglet = "Feuil2"
ActiveCell.FormulaR1C1 = "=VLOOKUP(R[1]C4," & onglet & "!C4:C28,24,FALSE)"
End Sub

Discussions similaires

recherche à partir de la barre d'adresse

Bonjour,

Avant, je pouvais faire une recherche sur internet directement dans la barre d'adresse. J'ai dû désactiver quelque chose sans le vouloir. Aujourd'hui si je saisis un mot pour rechercher,je n'obtiens que cette réponse :
http:///?%20j
Quelqu'un peut-il m'aider ?
Merci

"L'indice n'appartient à la sélection" + VBA

Bonjour,
Nous avons un problème dans la programmation de notre VBA. Voici notre programme:

Sub Bloucle1Bull()
Dim a, k As Integer

k = 2
Do While Worksheets("formulaire").Cells(2, 2) Worksheets("formulaire").Cells(k, 4)
k = k + 1
Loop

a = 2
Do While Worksheets("formulaire").Cells(k + 1, 4) Worksheets("BDD Call").Cells(a, 1) Or (Worksheets("BDD Call").Cells(a, 4) = (Worksheets("Bullspread").Cells(2, 3) + 100)) Or Worksheets("BDD Call").Cells(a, 7) Worksheets("bullspread").Cells(2, 7)
a = a + 1
Loop

''''''''''''on recopie la ligne du premier call trouvé pour le jour 2 ...

Erreur d'exécution 13 Incompatibilité de type

Bonjour,

Je ne comprend pas pourquoi j'ai une erreur d'execution 13 : incompatibilité de type car mon code marchait très bien avant...Je met en gras la ligne où il y a l'erreur

'affichage des feuilles concernées et vérification des champs Sheets("Recap").Visible = True If Cathégories = "" Then MsgBox "Sélectionnez une catégorie de défauts dans la liste déroulante" ElseIf défauts = "" Then MsgBox "Sélectionnez un défauts qualité dans la liste déroulante" Exit Sub End If Dim i As Integer Dim n As Integer n = 3 i = 2 MsgBox "Veuillez patienter pendant le traitement..." Application.Cursor = xlWait 'affiche le sablier 'Suppression des don...

Réglage chaine de la TNT FR3 TF1 A2 TMC

Bonjour,
J ai un tv Samsung 4K et impossible de regler
Tf1
Fr3
A2
M6
Tmc
A l aide

Merci

comment trouver une personne sur facebook

salut à tous,
je veux savoir comment trouver une personne approximativement sur facebook en sachant son nom et prénom... et comment voir son profil avant d'accepter la demande d'amis