Copier cellule d 1 feuil dasn autre feuil vb
Résolu/Fermé
rvz
Messages postés
35
Date d'inscription
samedi 20 octobre 2007
Statut
Membre
Dernière intervention
8 octobre 2008
-
24 janv. 2008 à 23:37
rudi - 8 juin 2008 à 08:36
rudi - 8 juin 2008 à 08:36
A voir également:
- Copier cellule d 1 feuil dasn autre feuil vb
- Copier une vidéo youtube - Guide
- Vb cable - Télécharger - Audio & Musique
- Super copier - Télécharger - Gestion de fichiers
- Aller à la ligne dans une cellule excel - Guide
- Vb - Télécharger - Langages
3 réponses
Si tu veux copier A1 en A1, B2 en B2 voici un truc qui marchera.
tu selectionnes ta cellule et tu lances la macro
Sub copier()
Dim myval As String, origine As String
origine = ActiveCell.Address
myval = ActiveCell.Value
Worksheets("Feuil2").Range(origine).Value = myval
End Sub
@+
tu selectionnes ta cellule et tu lances la macro
Sub copier()
Dim myval As String, origine As String
origine = ActiveCell.Address
myval = ActiveCell.Value
Worksheets("Feuil2").Range(origine).Value = myval
End Sub
@+
rvz
Messages postés
35
Date d'inscription
samedi 20 octobre 2007
Statut
Membre
Dernière intervention
8 octobre 2008
25 janv. 2008 à 20:25
25 janv. 2008 à 20:25
Sub copier()
Dim myval As String, origine As String
origine = ActiveCell.Address
myval = ActiveCell.Value
Worksheets("Feuil2").Range(origine).Value = myval
End Sub
Salut,
Si jamais une réponse est déjà parvenu pour le remerciement,tant pis.
Je n'ai qu'une chose à dire :"BRAVO ET MERCI"
Parce que je viens d'économiser une soirée et je vais pouvoir continuer à me casser la tête pour la suite.
Encore une fois merci EGO et si jamais je eux rendre la pareille quoiqu'à mon avis tu es très fort beaucoup plus que moi ;-)
Bonne soirée et merci
@+
Dim myval As String, origine As String
origine = ActiveCell.Address
myval = ActiveCell.Value
Worksheets("Feuil2").Range(origine).Value = myval
End Sub
Salut,
Si jamais une réponse est déjà parvenu pour le remerciement,tant pis.
Je n'ai qu'une chose à dire :"BRAVO ET MERCI"
Parce que je viens d'économiser une soirée et je vais pouvoir continuer à me casser la tête pour la suite.
Encore une fois merci EGO et si jamais je eux rendre la pareille quoiqu'à mon avis tu es très fort beaucoup plus que moi ;-)
Bonne soirée et merci
@+
27 janv. 2008 à 11:33
J'espère que tu as reçu mon message de remerciement
J'ai bien avancé.
Si par hasard tu sais comment remplacer le résultat de cellules par un autre résultat sachant que la cellule à remplacer se trouve dans la cellule de la conne coté droit (chercher "ca" variable qu'on va trouver dans m20 et encore d'autres il faut remplacer la cellule N20 et lencore d'autres par une valeur à rechercher dans un petit tableau)
Bref remplacer tous les résultats situés à droite des cellules contenant ca.
J'ai une méthode mais je la trouve longue alors qu'avec edition remplacer c'est ultra rapide mais je ne vois pas comment remplacer la cellule contigue droite.
SI jamais
Merci
RVZ