En iyi yanıtlayıcılar
[Office 2007, Excel] 2007 EXCEL DE RENKLİ TOPLAM

Soru
-
Merhaba,
Tarafınızdan ancak yazılı yardım alabiliyormuşuz.
Benim Excel ile ilgili bir sorunum var.
Yardımlarınızı rica ediyorum mümkünse. Sorunum şu:
Lisanslı 2007 Excel kullanıyorum. RenkToplaSay makrosunu kullanarak bazı renkli verileri toplayabiliyorum. Fakat bu verileri excel dosyası olarak başka bir kullanıcıya göndermem gerekiyor. Aynı ağ içindeki bu kullanıcı benim yapmış olduğum renkli toplamları alamıyor ve şöyle bir hata veriyor: #AD?
Bunun nedenini öncelikle makronun o bilgisayarda kayıtlı olmamasına bağladım, ancak Makroyu o bilgisayara kaydettiğim halde yine aynı hatayı verdi. Bu kullanıcının, göndermiş olduğum her renkli toplam dosyasını sorunsuz okuyabilmesi için ne yapmam gerekiyor?
Bilgi ve ilginize şimdiden teşekkür ederim.
- Düzenleyen Mehmet Hakan TATLICI 19 Ocak 2011 Çarşamba 07:42 Capiton Edited
14 Ocak 2011 Cuma 06:33
Yanıtlar
-
Gül Hanım,
Aşağıda size benim, sizin yönergeleriniz doğrultusunda oluşturduğum dosyanın linkini veriyorum bunu indirerek kullanabilirsiniz benim kendime göre yazdığım macro içerisinde mevcuttur. Hücre ve formülleri isteğinize göre düzenleyerek kullanabilirsiniz.
http://www.cozumadimi.com/araclar/test/43-renkli-yazi.html
Ayrıca ihtiyacınız olabileceğini düşündüğüm macroda aşağıda mevcuttur.
Function RenkliYaziTopla(Aralik As Range, Kriter As Range)
Dim Hucre As Range
Application.Volatile
For Each Hucre In Aralik
If Hucre.Font.ColorIndex = Kriter.Font.ColorIndex Then
Sonuc = Sonuc + Hucre.Value
End If
Next Hucre
RenkliYaziTopla = Sonuc
End Function
Mehmet Hakan TATLICI
Microsoft Destek Mühendisi - Moderator
Bu içerik olduğu gibi benim tarafımdan hazırlanmış olup Microsoft tarafından herhangi gibi bir sorumluluk üstlenildiği anlamına gelmez.
- Yanıt Olarak İşaretleyen Mehmet Hakan TATLICI 19 Ocak 2011 Çarşamba 07:39
18 Ocak 2011 Salı 15:03 -
Benim size gönderdiğim örnek dosyada Herhangi bir yere kırmızı yazıyla Kırmızıların Toplamı yazın ama bu yazı kırmızı olsun daha sonra belli bir alandan verileri alın ve son olarak Kırmızıların Toplamı olarak ilettiğimiz hücreyi formüle ekleyelim.
Mesela b1 b20 arasındaki verilerin örneğini şu şekilde yapabilirsiniz. =RenkliYaziTopla($B$1:$B$20;C1) bu formülde sonda gördüğünüz C1 hücresinde de Kırmızıların Toplamı yazısı olmalı kırmızı yazıyla benim macrom bu şekilde çalışıyor ancak sizin eski macronuzdan farklılıklar olması normaldir macro yazan kişinin isteğine göre değişebilir.
Mehmet Hakan TATLICI
Microsoft Destek Mühendisi - Moderator
Bu içerik olduğu gibi benim tarafımdan hazırlanmış olup Microsoft tarafından herhangi gibi bir sorumluluk üstlenildiği anlamına gelmez.
- Yanıt Olarak İşaretleyen Mehmet Hakan TATLICI 19 Ocak 2011 Çarşamba 07:39
19 Ocak 2011 Çarşamba 07:04
Tüm Yanıtlar
-
Merhaba,
Formül kullanarak yaptığınız için karşı tarafa dosya iletildiğinde formüllerde bozulma yada farklı bir sıkıntı yaşanıyor olabilir.
Office 2007 Excel'de bu durumu formül kullanmadan Koşullu biçimlendirmeyi kullanarakta yapabilirsiniz. Aşağıdaki makaleyi okuyarak koşullu biçimlendirme hakkında bilgi alabilirsiniz.
Mehmet Hakan TATLICI
Microsoft Destek Mühendisi - Moderator
Bu içerik olduğu gibi benim tarafımdan hazırlanmış olup Microsoft tarafından herhangi gibi bir sorumluluk üstlenildiği anlamına gelmez.
14 Ocak 2011 Cuma 07:08 -
Mehmet Bey,
Makaleyi okudum ancak olmadı.
Ben 2007 Excel kullanıyorum. Koşullu biçimlendirmede Alan veya grup seçin seçeneğini göremedim.
Teşekkür ederim.
Kolay gelsin
- Düzenleyen Mehmet Hakan TATLICI 14 Ocak 2011 Cuma 08:44 kişisel bilgi paylaşımı
14 Ocak 2011 Cuma 07:41 -
Alan veya grup seçin olarak ifade edilen şey Excel'de sizin bu durumu yansıtmanızı istediği yeri seçmenizi iletiyor
Mehmet Hakan TATLICI
Microsoft Destek Mühendisi - Moderator
Bu içerik olduğu gibi benim tarafımdan hazırlanmış olup Microsoft tarafından herhangi gibi bir sorumluluk üstlenildiği anlamına gelmez.
17 Ocak 2011 Pazartesi 06:38 -
Merhaba Mehmet bey, Sanırım ben aslında ne istediğimi anlatamadım. Şekille anlatmaya çalışacağım. Örnek Tablo A B C D TOPLAMLAR ELMA 54 (kırmızı) 50 (sarı) 48 (yeşil) 85 (kırmızı) KIRMIZI TOPLAMLAR ARMUT 45 (yeşil) 63 (kahverengi) 45 (kırmızı) 23 (yeşil) YEŞİL TOPLAMLAR KESTANE 110 (kahverengi) 57 (yeşil) 90 (sarı) 85 (kahverengi) KAHVERENGİ TOPLAMLAR LİMON 18 (sarı) 25 (kırmızı) 400 (kahverengi) 47 (sarı) SARI TOPLAMLAR TOPLAMLAR KIRMIZI TOPLAM YEŞİL TOPLAM KAHVERENGİ TOPLAM SARI TOPLAM Şekilde olduğu gibi, ürünlerin geliş firmaları, tarihleri, henüz faturası kesilmemiş olanlar veya satılacakların her birine bir renk verilmiş. Her rengin bir anlamı var yani. Biz bunları renklerine göre toplamak istiyoruz. Aynı zamanda bu toplamların diğer bilgisayarlarımızda da görünmesini istiyoruz. =RenkTopla(B2:I2;3) gibi bir formülle bunu yapıyoruz, ancak diğer bilgisayarlarda #AD? şeklinde hata veriyor. Sizin gönderdiğiniz Koşullu Biçimlendirme adı altındaki makale ile bu sorunu çözemedim. Çünkü orada desen eşleştirmesinden bahsediyor. Ya bizde öyle bir özellik yok ya da ben yanlış yere bakıyorum. Yardımlarınız için teşekkür ederim. Kolay gelsin.17 Ocak 2011 Pazartesi 13:42
-
Renkler neye göre belirlenmiş durumda her rakamın mı bir rengi var yoksa her ürüne ait bir renk mi var anladığım kadarıyla ikiside değil mevcut dosyanızı paylaşmanızda bir sakınca varmıdır?
Mehmet Hakan TATLICI
Microsoft Destek Mühendisi - Moderator
Bu içerik olduğu gibi benim tarafımdan hazırlanmış olup Microsoft tarafından herhangi gibi bir sorumluluk üstlenildiği anlamına gelmez.
17 Ocak 2011 Pazartesi 14:44 -
Her renge bir kod veya rengin adını koymanız daha mantıklı olabilir. Sadece renk kullanımında bazı sürümlerde sorun yaşanabilir.
Mehmet Hakan TATLICI
Microsoft Destek Mühendisi - Moderator
Bu içerik olduğu gibi benim tarafımdan hazırlanmış olup Microsoft tarafından herhangi gibi bir sorumluluk üstlenildiği anlamına gelmez.
17 Ocak 2011 Pazartesi 15:02 -
Günaydın, Renkler, ürünlerin alındıkları firmaya göre ve henüz faturalanmamış olmalarına göre değişiyor. İstediğim şey, renkleri kendi aralarında toplamak. Kırmızıları, yeşilleri ve diğer bütün renkleri. İçlerinde rakam olan bütün dolgulu hücreleri toplamak istiyorum ve bunun başka bilgisayarlarda da görünmesini istiyorum. Kolay gelsin.18 Ocak 2011 Salı 07:13
-
Yeniden Merhaba,
Tüm olasılıkları kendi sistemlerimde test ettim aşağıdaki olasılıkları bilginize sunarım.
Normalde elinizde bulunan excel dosyası içerisine iliştirilmiş olan Macro dosyayı normal kaydettiğinizde Macroyu içerisine almaz ve başka yerde açtığınızda da doğal olarak veriler doğru gelmez. Normal çalışan sistemden dosyayı farklı kaydet ile *.xlsm uzantılı olacak şekilde Macro etkin halde kaydedip başka bir bilgisayarda açarsanız sorununuzun giderildiğini göreceksiniz.
Not: Diğer bilgisayarda dosyayı açarken güvenlik ile ilgili bir uyarı yada seçenek karşınıza gelebilir içeriği etkinleştir derseniz sorun ortadan kalkar.
Bu adımları kontrol edelim sonrasında sorununuz devam ederse ben size yeniden dosya yapılandırması ile ilgili yardım edeceğiz macroyu beraber yeniden oluşturabiliriz.
Mehmet Hakan TATLICI
Microsoft Destek Mühendisi - Moderator
Bu içerik olduğu gibi benim tarafımdan hazırlanmış olup Microsoft tarafından herhangi gibi bir sorumluluk üstlenildiği anlamına gelmez.
18 Ocak 2011 Salı 09:39 -
Mehmet Bey Size sorular sorup yanıt beklerken, dayanamayıp bir şeyler yapmaya çalıştım. Bir şeyler yapayım derken işi kökünden halledip, hali hazır da var olan macroyuda kullanamaz hale getirdim. Nasıl yaptım bilemiyorum doğrusu. Kendi bilgisayarımda yaptığım renkli toplamlarda da #AD? hatası veriyor. Macroyu yeniden kaydettim, yine de düzelmedi. Neden böyle bir hata veriyor anlayamadım. (Dimyata pirince giderken evdeki bulgurdan oldum.) Yardımınıza ihtiyacım var Mehmet Bey...18 Ocak 2011 Salı 14:36
-
Gül Hanım,
Aşağıda size benim, sizin yönergeleriniz doğrultusunda oluşturduğum dosyanın linkini veriyorum bunu indirerek kullanabilirsiniz benim kendime göre yazdığım macro içerisinde mevcuttur. Hücre ve formülleri isteğinize göre düzenleyerek kullanabilirsiniz.
http://www.cozumadimi.com/araclar/test/43-renkli-yazi.html
Ayrıca ihtiyacınız olabileceğini düşündüğüm macroda aşağıda mevcuttur.
Function RenkliYaziTopla(Aralik As Range, Kriter As Range)
Dim Hucre As Range
Application.Volatile
For Each Hucre In Aralik
If Hucre.Font.ColorIndex = Kriter.Font.ColorIndex Then
Sonuc = Sonuc + Hucre.Value
End If
Next Hucre
RenkliYaziTopla = Sonuc
End Function
Mehmet Hakan TATLICI
Microsoft Destek Mühendisi - Moderator
Bu içerik olduğu gibi benim tarafımdan hazırlanmış olup Microsoft tarafından herhangi gibi bir sorumluluk üstlenildiği anlamına gelmez.
- Yanıt Olarak İşaretleyen Mehmet Hakan TATLICI 19 Ocak 2011 Çarşamba 07:39
18 Ocak 2011 Salı 15:03 -
Günaydın Mehmet Bey. Link için teşekkür ederim. Macroyuda kaydettim ancak, henüz sonuç alamadım. Sanırım bir formül yazmam gerekiyor. Macrodan anladığım kadarıyla formül şu = RenkliYaziTopla(veri aralığı;"toplanacak sayının renk kodu") renk kodunu yazabilmem için bir formülle kodunu bulmam lazım sanırım. Renktopla macrosu için A1 hücresinin renk kodunu sorgularken =HucreRenkBilgisi(A1)yazıyordum ve o rengin kodu sayı biçiminde yazıyordu. Sonrasında da o rengi toplamak için =RenkTopla(A1:A15;renk kodu)yazıp A1 ile A15 Arsındaki o koda ait bütün sayıları topluyordu. Sizin göndermiş olduğunuz macrodan buna benzer bir formül çıkarmaya çalıştım ama, excelim Türkçe olduğu için midir bilemiyorum sonuç alamadım. Mehmet bey, ben yanlış bir yol mu izliyorum acaba. Kolay gelsin19 Ocak 2011 Çarşamba 06:58
-
Benim size gönderdiğim örnek dosyada Herhangi bir yere kırmızı yazıyla Kırmızıların Toplamı yazın ama bu yazı kırmızı olsun daha sonra belli bir alandan verileri alın ve son olarak Kırmızıların Toplamı olarak ilettiğimiz hücreyi formüle ekleyelim.
Mesela b1 b20 arasındaki verilerin örneğini şu şekilde yapabilirsiniz. =RenkliYaziTopla($B$1:$B$20;C1) bu formülde sonda gördüğünüz C1 hücresinde de Kırmızıların Toplamı yazısı olmalı kırmızı yazıyla benim macrom bu şekilde çalışıyor ancak sizin eski macronuzdan farklılıklar olması normaldir macro yazan kişinin isteğine göre değişebilir.
Mehmet Hakan TATLICI
Microsoft Destek Mühendisi - Moderator
Bu içerik olduğu gibi benim tarafımdan hazırlanmış olup Microsoft tarafından herhangi gibi bir sorumluluk üstlenildiği anlamına gelmez.
- Yanıt Olarak İşaretleyen Mehmet Hakan TATLICI 19 Ocak 2011 Çarşamba 07:39
19 Ocak 2011 Çarşamba 07:04 -
Harikasınız Mehmet Bey. Çok teşekkür ederim. Sizin gönderdiğiniz excel dosyasında oldu. Kendimi, Amerikayı yeniden keşfetmiş gibi hissettim. Şimdi diğer bilgisayarlara uygulamam lazım. Sorun olursa sizi yine rahatsız edeceğim haberiniz olsun. Kolay gelsin.19 Ocak 2011 Çarşamba 07:30
-
Tekrar merhaba Mehmet Bey, Diğer bilgisayarlarda da dahil olmak üzere kendi bilgisayarımdaki excel dosyalarında uygulamak istedim, ama yine #AD? diye bir hata verdi. Bende, bu tür dosyaları sizin gönderdiğiniz excel dosyasına taşıdım. Sorun şimdilik halloldu sayenizde. Çok Çok teşekkür ederim. Başarılarınızın devamını diliyorum. Kolay gelsin.19 Ocak 2011 Çarşamba 07:59