Hücre biçimlendirme

[vuranoğlu]

Merhabalar


Excel sayfasında a1 hücresine yazılan alfabetik ve nümerik değeler b1 hücresine aktarılırken başına ve sonuna * koymak istiyorum .Ancak * şeklini yazdıramadım. ( ' ) işaretini hücre biçimlendirmeden isteğe bağlı seçenekten yazdıra biliyorum ama * olmuyor .

İlgilenen arkadaşlara teşekkürler.

 

[Ömer]

Merhaba,

"*"

Bu şekilde deneyin.

.

 

[peleryn]

Makrosuz başka yolu var mı bilmiyorum.Formülle bu şekilde yaptım umarım işinizi görür.

=birleştir("*";A1;"*")

 

[Korhan Ayhan]

Selamlar,

Alternatif olarak B1 hücresine aşağıdaki formülü uygulayıp denermisiniz.

="*"&A1&"*"

 

[vuranoğlu]

teşekkürler

Ömer / peleryn / Korhan Ayhan

 

[Necdet]

Merhaba,

Biçimlendirme ile yapmak isterseniz B sütununu Özel Hücre Biçiminden Aşağıdaki Şekilde Biçimlendiriniz.

"*"Genel"*";"*"Genel"*";"*"Genel"*";"*"@"*"

B1

=A1

 

[vuranoğlu]

merhabalar

arkadaşlar yukarıda verilen alternatifleri uyguladığımızda a1 hücresi boş olduğunda ** şeklinde b1 devamlı dolu kalıyor. a1 boş olduğunda b1 boş a1 dolu olduğunda *xxxxxxxxx* şeklinde olabilir mi?
bu işlemler makroyla da olabilir mi?
teşekkürler

 

[Ömer]

Hücre biçimli örnek için,

[=0]"";"*"Genel"*";"*"@"*"

Formüllü örnekler için,

=eğer(a1="";"";formülünüz)

.

 

[vuranoğlu]

Ömer bey ,

verdiğiniz örnegi excel sayfasında gösterebilirmisiniz?

 

[Ömer]

Ömer bey ,

verdiğiniz örnegi excel sayfasında gösterebilirmisiniz?

Dosyanız ektedir..

.

 

[vuranoğlu]

Teşekkürler

 

[vuranoğlu]

Merhabalar

Aşağıdaki kod da nasıl bir değişiklik yapmam gerekiyor.
Hücreye *1234567890123* şeklinde gözüksün

Sub StyleAyarla_()
Dim styl As Style
For Each styl In ThisWorkbook.Styles
If styl.Name = "deneme" Then styl.Delete
Next styl
ThisWorkbook.Styles.Add Name:="deneme"
With ThisWorkbook.Styles("deneme")
'.NumberFormat = "*""*";"*""*";"*""*";"*"@"*"
' Buraya nasıl bir format yazmalıyım ki
' *1234567890123* şeklinde olsun

.NumberFormat = "*#######0 * """
.Font.Name = "Comic Sans MS"
.Font.Color = RGB(255, 0, 0)
.Font.Size = 15
End With
Range("B2:B65535").Style = "deneme"

End Sub

 

[esmehmet]

Merhaba

Bu konuda ben de sıkıntı yaşıyorum . Yardımcı olacaklara şimdiden teşekkürler.

 

[Skorpiyon]

Sayın vuranoğlu,

Aşağıdaki şekilde bir dener misiniz.

NumberFormat = """*""""*"";""*""""*"";""*""""*"";""*""@""*"""

 

[esmehmet]

Sayın Şaban Sertkaya

NumberFormat = """*""""*"";""*""""*"";""*""""*"";""*""@""*"""

bu şekilde de olmadı

 

[vuranoğlu]

Sayın Şaban Sertkaya

İlginize teşekkürler.
aşağıdaki şekilleri denedim ama sonuç alamadım.


[=0]"";"*"Genel"*";"*"@"*"

"*"&##&"*"


"*"Genel"*";"*"Genel"*";"*"Genel"*";"*"@"*"

NumberFormat = """*""""*"";""*""""*"";""*""""*"";""*""@""*"""

 

[Skorpiyon]

Sayın vuranoğlu,

Nasıl bir program yapmak istediğizi tam anlamış değilim ama, Stil yerine aşağıdaki şekilde yapsanız olmaz mı ?

 

[vuranoğlu]

Merhabalar

Teşekkürler Şaban Sertkaya

Excel de ekteki gibi bir sayfayı kullanmada bir problem yaşamıyorum.
Bu sayfayı yazdırdığımda barkodlar rahatlıkla tekrar okunabiliyor.
Bu çalışmayı userformla yaptığımda yazıcıdan alınan dökümleri
tekrar okutamıyorum.
B hücresine girilen " * " lar haric diğer alfabetik ve nümerik değerlerin tamamı 13 karakter
- Userform da Texbox da MaxLength değerini 13 yapınca bu olay gerçekleşmiyor.
-- Userform da hazırlanan sayfayı yazdırdıktan sonra barkodları tekrar okutmak için nasıl bir yol izleyebiliriz.

 

[suatbayhan]

Merhaba Sayın Hocalarım,
Benim hücre biçimlendirme konusunda bir ricam olacak.
Hücre Biçimlendir-İsteğe Uyarlanmış kısmında üslü sayılar ile özel simgeleri nasıl yazabilirim? (metrekare, metreküp veya ¢ gibi)
metrekareyi yaparken m2 çıkıyor ama ben üslü şekilde göstermek istiyorum.
Saygılarımla

 

[suatbayhan]

Ekteki dosyada demek istediğim belki daha iyi anlaşılır.
Saygılarımla.