Üstadım hakkını helal et, yanlış bilgi vermişim. Tablo aşağıdaki gibi boş satırlardaki formül veri olmayınca 0 yazmakta
Renk beyazlanacak satırlar E4,F4,G4,H4 Boş satır I4
E4
F4
G4
H4
I4
24800
187...
Öncelikle ilginize teşekkür ederim.
Formül ile koşullu biçim seçenek olarak kullanılabilir neden olmasın , fakat dosya yükü ve boyutu oldukça fazla olduğu için mümkün olduğu kadar makro kullanarak çözüm üretebilmek , hem bu açıdan hem de dinamik veri değişimi olduğu zaman en iyi seçenek...
Makro ile çözüm konusunda destek olamam..
Koşullu Biçimlendirme ile isterseniz eğer,
(Aslında, dinamik olarak da yapılabilir ama sabit adette veriymiş gibi statik olarak yapıp açıklamayı tercih ettim)
Not : Koşullu Biçimlendirme olunca, çizgi kalınlıkları ince olmakta... Başka seçenek yok...
1...
Merhabalar elimde çok satırlı bir liste var listede ad soyadlar veya tcler tekrarlanıyor
Ali kaya
Ali kaya
Ali kaya
Mehmet uzun
Alper şen
Veli kum
Veli kum
Emel sarı. Aliler ayrı renk Mehmet ayrı renk şeklinde otomatik boyama yaptırabilir miyiz. Yani sıralama mavi beyaz mavi beyaz mavi gidecek
değerli arkadaşlar ben sorunumu anlatamadım muhtemelen. istediğim şey MACRO sayfasındaki 3,4,5,6........son satıra kadar olan A-CC sütunlarındaki verileri 1. satır A-CC sütunlarındaki veriler ile birleştirmek. sorun ise soldan sağa doğru 9 'arlı 9 grup olması aynı şekilde bu 9 grubun...
Sayfa adınızı güncelleyin.
Dikkat bu makro ilgili alanı sort yaparak hücrelerin yerini değiştirir. Size uygunsa kullanınız.
Not: Dosyanıza bakma imkanım yok.
Sub UygulaRangeC7CW600()
Dim ws As Worksheet
Dim veriAraligi As Range
' Çalışma sayfasını belirle
Set ws =...
Sub Duzenle()
Dim ws As Worksheet
Dim satir As Integer, sonDoluSuton As Integer
Dim mergeRange As Range
Dim ibare As String
' Çalışmak istediğiniz sayfa
Set ws = ThisWorkbook.Sheets("KAPAK") ' Sayfa adını güncelleyin
' Satırların birleştirileceği sütun...
Sub Test()
Dim ws As Worksheet
Dim satir21, satir22, satir23, satir24, satir25, satir26, satir27, satir28, satir29, satir30, satir31, satir32, sonDoluSuton As Integer
Dim birlesmisHucresi1, birlesmisHucresi2 As Range
' Çalışmak istediğiniz sayfa
Set ws =...
Merhabalar.. filtreleme ile ilgili bir sorum olacak. C sütunundan başlayıp CW sütununa kadar giden satır olarak ise 1000 satırlık verim var. (C7:CW1000) Yapmak istediğim ise aslında gelişmiş bir filtreleme benzeri bir şey yapabilmek sonrasında. Amacım ise mesela C sütununda en yüksek ilk 10...
Arkadaşlar B sütunundaki değerlere göre C,D,E,F sütunlarını otomatik yeşil ya da sarı ile boyamak istiyorum ancak koşullu biçimlendirmede birçok formül denedim olmadı.Birde satır sayısı çok olacağından dolayı tek yek boyamak mantıksız geldi. Mesela B2 deki içerik ASIL ise C,D,E,F sarı renk, EK...
Çok Değerli Excel Web Ailesine selamlar.
Benim sorum bir projeme entegre etmek istediğim bir özellik.Projemdeki aynı satır sütunların durumunu simultene ettim.Gereken Bütçe bölümündeki B1 deki renk koduyla uyuşan MAL-GİRİŞİ sekmesindeki verileri,Gereken Bütçe Sekmesine çekmek istiyorum...
Merhaba,
belli bir sütun-satır?
girilen rakam?
excel için genel tanımlar.
Daha açıklayıcı bilgi ve örnek dosya olsa sanırım çözüm bulabilirsiniz.
ChatGpt'ye sizin sorunuzu aynen sordum, aşağıdaki yanıtı aldım.
Excel'de VBA (Visual Basic for Applications) kullanarak belirli bir koşula göre...
Koşullu biçimlendirmede
=SATIR()=HÜCRE("sat") formülü ile ilgili satırı renklendirip
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.Calculate
End Sub
ile renkli olmasını sağlıyorum ancak renk çıktılara da yansıyor. Sadece ekranda gözükip çıktılara yansımaması için ne...
Merhaba,
ekteki tabloda "ulaşılmak istenilen veri bölümü" diye belirttiğim verilerin binlerce satır uzunluğunda oluşturmam gerekiyor.
Özetle; Aynı ürünün ilgili ürünlerini (diğer alternatif renklerini) belirlememiz gerekiyor.
Yardımcı olursanız çok sevinirim, aksi taktirde hafta sonu manuel...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
sat = Target.Row
süt = Target.Column
If sat >= 1 And süt <= 200 Then
Dim Satır As Range, Sütun As Range
Set Satır = Range(Cells(ActiveCell.Row, 1), Cells(ActiveCell.Row, 256)) '256 satıra kadar işlem yapar.
Set Sütun = Range(Cells(1...
Merhaba;
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
sat = Target.Row
süt = Target.Column
If sat >= 2 And süt <= 5 Then
Dim Satır As Range, Sütun As Range
Set Satır = Range(Cells(ActiveCell.Row, 1), Cells(ActiveCell.Row, 256)) '256 satıra kadar işlem yapar.
Set Sütun =...
Merhaba;
Sayfanın kod bölümüne;
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Satır As Range, Sütun As Range
Set Satır = Range(Cells(ActiveCell.Row, 1), Cells(ActiveCell.Row, 256)) '256 satıra kadar işlem yapar.
Set Sütun = Range(Cells(1, ActiveCell.Column)...
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.