İki bilgiyi bir hücreye yazma

[Ömer BARAN]

Herkese merhabalar !...

Aşağıdaki resimde görüldüğü gibi 2 bilgiyi ,
1 excel hücresinde
veya
sonuçta böyle görünmek ve birlikte kullanılmasını
(matematiksel anlamda ve makro içerisinde)
sağlamak şartıyla 2 hücrede de olabilir

tutulması ve kullanılması mümkün müdür acaba?

İlgilenenlere teşekkürler.

 

[Civan Jack]

SuperScript özelliğini araştırın

 

[muygun]

Merhaba;
İsteğinizi tam karşılamasada eki inceleyin. Size fikir verecektir.
İyi çalışmalar.

Not: Kodlar alıntıdır.

 

[Ömer BARAN]

İlginiz için teşekkür ve iki soru.

Sayın muygun bilgi ve örnek dosya için sağ olun.

Örnek dosyadaki düzenleme sayfasındaki D3-E3 hücresindeki şekli yapmak sorun değil, ancak çok sayıda veriyle uğraşınca resim işi biraz kullanışsız gibi geldi bana ancak gönderdiğiniz çalışma çok güzel doğrusu.

Düzenleme sayfasındaki bu iki veriyi şeklini de o iki hücrelerdeki gibi yaparak tek hücrede birleştirmek mümkün olur mu acaba?

"=E3&" "& D3" gibi bir formülle iki veriyi tek hücrede birleştirince de iki sorunu çözmek gerekiyor.

-- bu iki veriden birini, diğerine göre farklı biçimlendirmek ( dolgu, font gibi ), böylece eklediğim resme benzetmek.
-- daha sonra da verdiğiniz örnekteki E3 veya D3 hücresine değil, birleştirerek oluşturduğumuz, ikili değer içeren hücreye (E3 veya D3'e başvurusu olmaksızın) atıf yaparak birleştirilen verinin sağda veya solda olanını (sadece E3'ten veya sadece D3'ten gelen kısmına) formül başvurusunda kullanabilmek.

Bu konuda yapabileceğim bir şey var mıdır acaba?

 

[muygun]

Merhaba;
Tanımladığınız şekilde "=E3&" "& D3" gibi bir yöntemle yapılabileceğini , ikinci hücrenin çapraz olarak bölünerek bir kısmına altzemin rengi uygulamanın olabileceğini zannetmiyorum. (en azından 2003 te ben yapamam.)
Veri çokluğunu bilmiyorum. İlk eklediğiniz resmi inceleyincede bunun görsele dayalı bir tablo olabileceğini varsaydım. Düzenleme sayfası sadece 2 hücreye veri girererek 2 yada daha fazla hücrenin .jpg formatında resmini belirlenen yere kaydetmeyi sağlar. (10 dk. içinde yüzlerce resim oluşturmak mümkün)
Eğer bir veri tabanınız varsa bir sayfada bunları belirlerseniz işlemin (örn. bir değer değiştirici ile) kayıt işleminin daha kolaylaştırılmasına, aynı veritabanı kullanılarak diğer sayfaya resimlerin alınmasına katkı sağlayabilir.
İyi çalışmalar.

 

[Ömer BARAN]

Peki bir şey sorayım, bu resimleri oluşturarak UserForm'a aktaracağım grafikte kullanabilir miyim?

İlginiz için teşekkürler.

 

[muygun]

Merhaba;
Resmi grafikte kullanmak?
Burayı anlamadım. Grafik için sayısal veri gerekiyor. Resmin adı ise içindeki sayısalların bileşimi. Dolayısıyla resim adını parçalayarak içindeki rakam yada kodlamayı (eğer gerekiyorsa) kullanabilirsiniz.
İyi çalışmalar.

 

[Ömer BARAN]

Ben bu sitede exceli kullanarak nelerin yapıldığını görünce, şu da yapılabilir miymiş demiyorum artık. O nedenle sordum, daha üstünde uğraştığım işte grafik aşamasına gelmedim. Aklıma gelmişken sorayım istedim, sağlıcakla kalınız.

 

[İsmailCen]

Ömer Bey,
Benzer görünümü bende yapmaya çalıştım ve aşağıdaki kodlarla çözüm buldum.

     Üretim.Cells(k, 15) = Format(Numuneler.Cells(SatırNo, 114), "0;-0;-") & vbCrLf & Format(Numuneler.Cells(SatırNo, 40), "0;-0;-")
     Uznlk3 = Len(Numuneler.Cells(SatırNo, 114))
     Uznlk4 = Len(Numuneler.Cells(SatırNo, 40))
     With Üretim.Cells(k, 15).Characters(Start:=1, Length:=Uznlk3).Font
        .FontStyle = "İtalik"
        .ColorIndex = 16
     End With
     With Üretim.Cells(k, 15).Characters(Start:=Uznlk3 + 1, Length:=Uznlk4).Font
        .FontStyle = "Kalın"
        .ColorIndex = 1
     End With

Burada yapmaya çalıştığım;
Ekli resimden de anlaşılacağı gibi,Numuneler sayfasındaki iki ayrı hücreden veri alıp, Üretim sayfasındaki tek hücreye iki satır halinde yerleştiriyorum ve ayrı hücrelerden gelen verilerin Font Sitilini ve Font Rengini farklı yapıyorum.

Umarım böyle bir çözüm işinizi görür. Kolay gelsin.

 

[Ömer BARAN]

Teşekkürler, kod yazmayı pek bilmediğim için kendime lazım olduğunda forumdan bir şeyler bulup, kendi çalışmama uyarlamaya çalışıyorum.
Gönderdiğiniz kodu nasıl kullanacağım konusunda maalesef bir fikrim yok.
Keşke bu kodun kullanıldığı belgenin bir kopyasını (özel verileri silerek) gönderebilseniz.

Sağ olunuz.

 

[Ömer BARAN]

Merhabalar Sayın IsmailCen Bey Örnek Dosya Göndermeniz Mümkün müdür?

Ömer Bey,
Benzer görünümü bende yapmaya çalıştım ve aşağıdaki kodlarla çözüm buldum.

     Üretim.Cells(k, 15) = Format(Numuneler.Cells(SatırNo, 114), "0;-0;-") & vbCrLf & Format(Numuneler.Cells(SatırNo, 40), "0;-0;-")
     Uznlk3 = Len(Numuneler.Cells(SatırNo, 114))
     Uznlk4 = Len(Numuneler.Cells(SatırNo, 40))
     With Üretim.Cells(k, 15).Characters(Start:=1, Length:=Uznlk3).Font
        .FontStyle = "İtalik"
        .ColorIndex = 16
     End With
     With Üretim.Cells(k, 15).Characters(Start:=Uznlk3 + 1, Length:=Uznlk4).Font
        .FontStyle = "Kalın"
        .ColorIndex = 1
     End With

Burada yapmaya çalıştığım;
Ekli resimden de anlaşılacağı gibi,Numuneler sayfasındaki iki ayrı hücreden veri alıp, Üretim sayfasındaki tek hücreye iki satır halinde yerleştiriyorum ve ayrı hücrelerden gelen verilerin Font Sitilini ve Font Rengini farklı yapıyorum.

Umarım böyle bir çözüm işinizi görür. Kolay gelsin.

İsmail Bey kod yazmayı bilmediğim için gönderdiğiniz kodlar bana çok anlam ifade etmedi doğrusu, ama dosyadaki uygulamasını görseydim belki kendi belgeme uygulama şansım olabilirdi.

Mümkün olursa "bir hücrede iki bilgi" içeren yukarıdaki kodun uygulandığı bir örnek dosya eklerseniz çok sevinirim.

 

[İsmailCen]

Ömer Bey,
Dosya ekte. Tüm şifreler "excel.web.tr"tir.
Sizin aradığınız makro Komutlar modülü, ÜretimKontrol makrosu içerisindedir. Bu makro giriş sayfasında İşlemler yazan yere tıkladığınızda açılan menüden Ürün Kontrol komutunu seçtiğinizde çalışmaktadır.
Kolay gelsin...

 

[Ömer BARAN]

::..Teşekkür ve BİR SORU..::

Ömer Bey,
Dosya ekte. Tüm şifreler "excel.web.tr"tir.
Sizin aradığınız makro Komutlar modülü, ÜretimKontrol makrosu içerisindedir. Bu makro giriş sayfasında İşlemler yazan yere tıkladığınızda açılan menüden Ürün Kontrol komutunu seçtiğinizde çalışmaktadır.
Kolay gelsin...

İsmail Bey teşekkürler.

Bir şey sorayım; iki verinin bulunduğu hücredeki sayısal kısma formüllerde atıf yapmak mümkün müdür acaba? Örneğin başka bir sayfada
(ikili veri taşıyan hücre K9 hücresinde)

=ÜretimKontrol!K9*2 gibi bir işlem mümkün olmuyor?

Tabi parça alarak mümkündür ama pek pratik olmaz sanırım.

 

[İsmailCen]

=SAYIYAÇEVİR(SAĞDAN(ÜretimKontrol!K9;3))*2

şeklinde yazarsan işlem yaptırmak mümkün.