Bir hücreye Alt + Girilen her öğe için bir hesaplama (DÜŞEYARA gibi) nasıl yapılır.
Video izle
- Bir izleyici, her öğenin Alt + Enter ile ayrıldığı bir sistemden veri indirir
- Bill: Bunu neden yapıyorsun? Görüntüleyici: Verileri böyle miras alırım. Bu şekilde kalmasını istiyorum.
- Fatura: Tabloda olmayan değerlerin% 40'ı ile ne yapmak istiyorsunuz? Görüntüleyen: Cevap yok
- Bill: En son Power Query araçlarına sahipseniz, bunu çözmenin karmaşık bir yolu vardır.
- Bunun yerine, çözmek için bir VBA Makrosu - makro Excel 2007'ye kadar çalışmalıdır.
- DÜŞEYARA yapmak yerine, VBA ile bir dizi Bul ve Değiştir yapın
Video Metni
Excel'i Podcast Bölüm 2150'den Öğrenin: Her Hücreye Her Alt + Girilen Değer DÜŞEYARA.
Hey. İnternet yayınına tekrar hoş geldiniz. Ben Bill Jelen. Bugün, daha tuhaf sorulardan biri. Birisi, hey, hücredeki her değer için bir DÜŞEYARA yapmak istiyorum dedi ve Excel dosyasını açtığımda veriler ALT + Girildi. Yani, bu sırada 4 öğe var ve hepsi ALT + ENTER ile ayrılmış ve sonra sadece 2 burada ve 6 burada vb.
Bunu gönderen kişiye geri döndüm. Bu veriyi saklamanın gerçekten kötü bir yolu gibiydim. Bunu neden yapıyorsun? Ve o, sanki ben yapmıyorum gibiydi. Verilerin indirilme yolu budur. Onu ayrı sıralara ayırsam sorun olur mu dedim? Hayır, bu şekilde tutmalısın.
Peki. Bu nedenle, her bir öğe için bir DÜŞEYARA yapmanın iyi bir yolu yoktur ve yarın, yarın 2151 bölümünde, bunu yapmak için Power Query'de yepyeni bir özelliği nasıl kullanabileceğimizi size göstereceğim, ancak buna sahip olmak için Office 365'e sahip olmak.
Bu yüzden bugün, tamamen geri gidecek bir yöntem kullanmak istiyorum ve burada yaptığım şey, LOOKUPTABLE ile yeni bir çalışma sayfası oluşturdum, yani bunlar öğeler. Ayrıca bir sürü şey olduğunu fark ettim, buradaki şeylerin yaklaşık% 40'ının BAKABİLİR TABLOSU'nda olmadığını. Orada ne yapmak istiyorsun dedim ve bu soruya cevap yok, bu yüzden bir eşleşme bulamazsam onları olduğu gibi bırakacağım.
Pekala, burada sahip olduğum şey LOOKUPTABLE adında bir sayfam var ve şu anda dosyamın xlsx olarak depolandığını ve bir VBA makrosu kullanacağımı göreceksiniz. Bir VBA makrosu kullanmak için, onu xlsx olarak alamazsınız. Bu kurallara KARŞI. Öyleyse, KAYDETMELİSİNİZ ve bunu xlsm olarak kaydetmelisiniz. DOSYA, OLARAK KAYDEDİN ve ÇALIŞMA KİTABI'ndan MAKRO-ETKİN ÇALIŞMA KİTABI XLSM'ye veya İKİLİ ÇALIŞMA KİTABI'na değiştirin - bunlardan biri çalışacaktır - tamam ve KAYDET'e tıklayın.
Pekala, şimdi makro çalıştırma iznimiz var. Makro kaydediciye gitmek için ALT + F11. Bu büyük gri ekranla başlayın. INSERT, MODULE ve işte modülümüz ve işte kod. Ben de buna ReplaceInPlace adını verdim ve bir çalışma sayfası tanımladım. Bu LookupTable. Gerçek arama tablosu çalışma sayfanızın adını buraya koyardınız ve sonra arama tablom, sütun 1 olan A sütununda başlar. Bu yüzden, 1. sütunun en son satırına gidiyorum, END tuşuna ve YUKARI okuna veya , tabii ki, KONTROL + YUKARI oku aynı şeyi yapacak, hangi satır olduğunu bulacak ve sonra her satırdan 2'den Son Satır'a geçeceğiz. Neden 2? Eh, çünkü başlıklar 1. sıradadır. Bu yüzden, 2. satırdan başlayarak son satıra kadar değiştirmek istiyorum ve bu nedenle, 2'den Son Satır'a kadar her satır için, BaşlangıçDeğeri nedir 'A sütunundaki s ve ToValue B sütunundakidir.
Şimdi, herhangi bir nedenle, verileriniz J ve K içindeyse, o zaman bu J 10. sütun olur, böylece oraya 10 koyarsınız ve K 11. sütun olur ve sonra, Seçimde, değiştireceğiz FromValue to the ToValue. Bu burada gerçekten önemli. xlPart, xlPart - ve bu bir L, 1 sayısı değil - xlPart, hücrenin bir bölümünü değiştirmemize izin verecek çünkü bu parça numaralarının tümü bir satır besleme karakteriyle ayrılıyor. Göremeseniz bile oradadır. Bu, yanlış şeyi yanlışlıkla güncellememize izin vermeli ve ardından xlByRows, MatchCase, False, SearchFormat, False, ReplaceFormat, False, Next i.
Peki. İşte bu bizim küçük makromuz. Hadi deneyelim. Bu verileri alacağız ve hiçbir şeyi yok etmek istemiyorum, bu yüzden sadece orijinal verileri alıp sağa kopyalayacağım. Peki. Yani orada seçimimiz var. Aslında bu noktadan başlayacağım. Tüm makroların bir listesini almak için CONTROL + BACKSPACE ve ardından ALT + F8 tuşlarına basın. REPLACEINPLACE'imiz var. ÇALIŞTIR'ı tıklayacağım ve ARA TABLOSU'nda bir öğe bulduğu her yerde, bu öğe numarasını öğeyle değiştirdi, görünüşte bir DÜŞEYARA yapıyor, ancak onu bir DÜŞEYARA ile çözmiyoruz.
Peki. Öyleyse, çıkan yepyeni kitap - Power Excel With, 2017 Sürümü, 617 Excel Gizemleri Çözüldü - orada her türden harika yeni ipuçları.
Bugünün özeti: Görüntüleyici, her öğenin bir ALT + ENTER ile ayrıldığı bir sistemden veri indirir ve ardından her öğede bir DÜŞEYARA yapması gerekir ve biliyorsunuz, bunu neden yapıyorum; yani, kişi dedi ki, ben yapmıyorum ama bu şekilde devam etmeliyim; ve sonra değerlerin% 40'ı tabloda yok, pekala, cevap yok; sanırım bu öğeleri tabloya ekleyecekler; şimdi, yarın, bunu Power Query ile nasıl çözeceğimizi konuşacağız, ancak bugün, bu makro, Excel'in tüm Windows sürümlerinde en azından Excel 2007'ye geri dönecek şekilde çalışacak; bu nedenle, bir DÜŞEYARA yerine, VBA ile bir dizi bul ve değiştir.
Peki, merhaba. Uğradığın için teşekkür ederim. Bir dahaki sefere başka bir internet yayını için görüşürüz.
Dosyayı indir
Örnek dosyayı buradan indirin: Podcast2150.xlsm