Kelimelerin başındaki ( ' ) tek tırnak sembolü

[Korhan Ayhan]

Selamlar,

Arkadaşlar D sütunundaki ='DENEME şeklinde görünen hücrelerin başındaki ( ' ) tek tırnak sembolünü makro ile nasıl kaldırabilirim.

 

[ocamsul]

Kardeş eki bir incele belki işini görür. benzer bir uygulama

 

[Seyit Tiken]

Bu kodu bir deneyin.

Sub Makro1()
With Application
.TransitionMenuKey = "|"
.TransitionNavigKeys = False
.DefaultSaveFormat = xlNormal
End With
End Sub

 

[Kemal Demir]

Çözüm Biraz farklı ama Zannedersem İşinizi Görecektir.
Örnek veriyorum

D kolonunun yanına Bir kolon acarak Bu İşlemi Yaparsanız D Koloundaki ' sız değerler Yeni Eklediğiniz E Kolonuna Yazılacaktır.

Sub istenmeyenisaret()
For x = 2 To 1000
Cells(x, 5).Value = Cells(x, 4).Value
Next
End Sub

 

[mehmett]

Önce G1 hücresine 1 yazın sonra aşağıdaki makroyu çalıştırın.

Bu makro dolu hücreleri 1 ile çarpar ve ' işareti ortadan kalkar.

Sub Makro1()
Range("G1").Select
Selection.Copy
Selection.SpecialCells(xlCellTypeConstants, 23).Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlMultiply, _
SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False
Range("A1").Select
End Sub

G1 dolu ise başka bir hüceye 1 yazın ve yukarıdaki kodda geçen G1'i değiştirin.

 

[Kemal Demir]

Mehmet Bey,

Gerçekten Değişik Bir Düşünce Çok İyi.Tebrikler.

 

[Korhan Ayhan]

Arkadaşlar ilginiz ve cevaplarınız için teşekkür ederim. :arkadas: