Copier coller valeurs plages de cellules

bonjour à tous,

Je n'ai aucune connaissance du langage vba, j'ai réussi à obtenir une macro pour copier coller une plage jusqu'à une cellule vide mais je n'arrive pas à trouver pour indiquer que je veux un collage de la valeur de la plage.

Voici le code:

Sub CopierCollerPlageDeCellules()
Dim wsSource As Worksheet
Dim wsDestination As Worksheet
Dim sourceRange As Range
Dim destinationRange As Range
Dim cell As Range
Dim destinationCell As Range
Dim rowOffset As Long
Dim colOffset As Long

' Définir la feuille source et la feuille destination
Set wsSource = ThisWorkbook.Sheets("Feuil2") ' Remplacez "Feuil1" par le nom de votre feuille source
Set wsDestination = ThisWorkbook.Sheets("Feuil1") ' Remplacez "Feuil2" par le nom de votre feuille destination

' Définir la plage source (par exemple, cellules A1:C10)
Set sourceRange = wsSource.Range("k1:ab65271") ' Ajustez cette plage selon vos besoins

' Définir la première cellule de la plage destination (par exemple, cellule A1 sur la feuille destination)
Set destinationRange = wsDestination.Range("A1") ' Ajustez cette cellule selon vos besoins

' Copier la plage de cellules
For Each cell In sourceRange
' Vérifier si la cellule n'est pas vide et si elle contient une valeur valide
If Not IsEmpty(cell) And IsNumeric(cell.value) Or IsText(cell.value) Then
rowOffset = cell.Row - sourceRange.Row
colOffset = cell.Column - sourceRange.Column
Set destinationCell = destinationRange.Offset(rowOffset, colOffset)
destinationCell.value = cell.value
End If
Next cell
End Sub

Est-ce que quelqu'un peut m'aider?

Avec mes remerciements

Bien à vous

Bonsoir berns06,

Cette petite macro fait un coier-coller valeur depuis la source vers la destination :

Sub Copie()
    Sheets("Feuil2").Select
    Range("K1:AB65271").Copy
    Sheets("Feuil1").Select
    Range("A1").PasteSpecial Paste:=xlPasteValues
End Sub

À toi de jouer.

Je te remercie Valky,

le souci est que je ne souhaite pas copier l'intégralité de la plage car sur cette plage k1 à ab65271 il y a des formules qui dépendent de ce qu'il y a dans une colonne.

Si la cellule de la colonne est vide la formule ne sera pas exécutée et donc restera vide.

De ce fait il ne faut pas copier les cellules vides, ce qui explique la recherche de la première cellule vide.

Y-a-t-il un moyen de légèrement modifier mon code pour indiquer que je veux coller uniquement les valeurs?

Bien à toi

bonjour berns06,Valky68,

@Valky68, un "select"

je te remercie valky j'ai réussi à trouver