Couper en faisant référence à la cellule active

Choc21 Messages postés 1 Statut Membre -  
ccm81 Messages postés 11033 Statut Membre -
Réponse sur ce site mais sur une même ligne, cela fonctionne .
mais à partir d'une cellule active couper un champs en exemple $c$20:$c$30 et copier ce champs a partir de la cellule active, exemple de A30 et débuter la copie c30 avec revenir à la cellule active .
je ni arrive pas dans VBA.

Merçi pour une solution ou un début de réponse
A voir également:

1 réponse

Réponse 1 / 1
ccm81 Messages postés 11033 Statut Membre 2 433
 
Bonjour

Un début de réponse (pour couper/coller "champ" à partir de "celdep" et retour à la cellule active) 

Option Explicit

Const champ = "D3:F5"
Const celdep = "G8"

Public Sub CouperColler()
Dim adr As String
  adr = ActiveCell.Address
  Range(champ).Cut Range(celdep)
  Range(adr).Select
End Sub

Cordialement
0

Discussions similaires

Message ne s'envoie pas données mobiles Redmi
Eric -
FalkenHarlais -

4 réponses
Enlever le pass. Telecomm. Active
Lisa -
Yves -

3 réponses
Excel formule : savoir si une cellule contient partie texte
plunderer007 -
francois -

14 réponses