DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
evet o oldu ama şöyle bir sorun var formülleride kopyalıyor ben sadece değerleri kopyalasın istiyorum
[COLOR=red]sayfa.Copy[/COLOR]
Dim x As Range
For Each x In [A1:K30]
If x.Value <> "" Then
x.Value = x.Value
End If
Next x
[COLOR=red]Sheets(ActiveSheet.Name).Name = deger1[/COLOR]
yine olmadı desem