• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Soldan ve Sağdan Parçaal Kodu

  • Konbuyu başlatan Konbuyu başlatan ahmedummu
  • Başlangıç tarihi Başlangıç tarihi
A

ahmedummu

Misafir
Merhaba arkadaşlar.

Soldan ve Sağdan formüllerinin makro kodu var mıdır?

Aktif hücrenin 3 sağındaki hücrenin başından ve sonundan birer karakter almak istiyorum. Yardımcı olursanız sevinirim.
 
Aşağıdaki şekilde deneyin.
Kod:
ActiveCell.Value = Left(Cells(ActiveCell.Row, ActiveCell.Column + 3), 1) & Right(Cells(ActiveCell.Row, ActiveCell.Column + 3), 1)
 
Alternatif.:cool:
Kod:
Sub sagdansoldan59()
Dim deger As String, sagdan As String, soldan As String
deger = ActiveCell.Offset(0, 3).Value
sagdan = Left(deger, 1)
soldan = Right(deger, 1)
MsgBox "sağdan 1 = " & sagdan & vbLf & "soldan 1 = " & soldan & vbLf & "evrengizlen@hotmail.com"
End Sub
 
Geri
Üst