vba

Sub deneme() Select Case Range("A1").Value Case Range("A1").Value Like "*" & "PTS" & "*" Range("B1").Value = "PAZARTESİ" Case Range("A1").Value Like "*" & "SSL" & "*" Range("B1").Value = "SALI" Case Range("A1").Value Like "*" & "CRS" & "*" Range("B1").Value = "ÇARŞAMBA" Case Else Range("B1") =...

Herkese selamlar, Konuyu forumda ve internette araştırdım ama ya bu konuya pek girilmemiş, ya da başlı başına ağır kod blokları oluşturulmuş. onları da istediğim şekle eviremedim ne yazıkki. eğer ne arayacağımı tam anlamadığım için örnek konuları bulamıyorsam da siz önerirseniz sevinirim...

Arkadaşlar iyi akşamlar internet üzerinde veri çekiyorum birçoğunu hallettim ama resimdeki yeri bir türlü çekemedim nasıl yapabilirim? html bilgim zayıf yapamadım bir türlü.

merhabalar şu şekilde kodum var hata veriyor Sub damga_yapıstır() Dim sonsatir As Long, a As Byte Application.ScreenUpdating = False For a = 4 To 27 sonsatir = Sheets(a).[A1048423].End(xlUp).Row Application.CutCopyMode = False Sheets("damga").Rows("20:33").Copy Sheets(a).Rows(sonsatir +...

Arkadaşlar iyi günler elimde 70 mb büyüklüğünde dosya var ben bu dosya içinde sorgu yaptırıyorum normal olarak dosya kasıyor sorum şu dosyayı Access uygulamasına yüklesem sorguyu oradan nasıl çekebilirim access ile hiçbir fikrim yok örnek olarak Excel dosyamı ve ufak veri olan Access dosyamı...

merhabalar çalışma kitabımın 4. ve 27. sayfaları arasındaki tüm sayfalarda son satır ve 14 satır üstü arası satırları silmek istiyorum yardımcı olabilirmisiniz

merhabalar PERSONEL isimli sayfadaki A2 VE A son satır aralığındaki hücrelerde yazan isimlerle aynı olan çalışma sayfalarını sildirmek istiyorum yardımcı olabilirmisiniz?

Merhaba, Geçen hafta paylaştığım dosyanın birinci adımı tamamlandı teşekkür ederim. Eke ilk adımı tamamlanmış dosyayı da ekliyorum. İkinci adım: "BALIKESİR SEVK PLANI DENEME" dosyasında "MÜŞTERİ 1" sayfasında kırmızı kenarlık yaptığım bölümü "BALIKESİR SEVK" dosyasında oluşturmak istiyorum...

Merhaba, Benim kullandığım bir sevk planı dosyası var ama bu dosyayı daha kullanışlı bir hale getirmek istiyorum. "SİPARİŞLER" sayfasına manuel olarak gelen siparişleri giriyorum. Stok ve Sevk raporlarını da manuel çekiyorum. Benim istediğim sipariş sayfasında yazdığım bilgileri müşteri ismine...

Merhaba, Excelde çalışan makroyu google e-tablolarda kullanmak istiyorum. Alttaki VBA kodunun google e-tablolara uygun hale getirilmesi konusunda yardımcı olabilirmisiniz. Sub Aktar() Dim Sayfa As Worksheet, S1 As Worksheet, Son As Long, Satir As Long Application.ScreenUpdating =...

Merhabalar, Her faklı format için psikolojik fiyatlama oluşturuyorum. Örnek olarak attığım dosyanın currency başlığından itibaren kalan başlıkları ben oluşturup formüllerle dolduruyorum. Onun öncesinde belirlenen EXW% ne göre trfrp miktarı değişip exw oluyor. Onun üzerinden ilk olarak her...

Excel örnekleri ile yardım dosyası

Herkese merhabalar, Bir malzeme ihtiyaç raporlama projesi üzerinde çalışıyorum burada yapmak istediğim şey " ÜRÜN-HAMMADDE" sayfasında o hammaddenin hangi ürün için kullanıldığının listesi var, bu listede olan ürünleri "MRP" sayfasında kendi altında gruplandırmak istiyorum ( farklı renk ile...

Merhabalar. Ekte bulunan dosyada permütasyon kısmına 80 tane karakter yazıyorum ve bu 80 karakterin 4 lü kombinasyonunu almak istiyorum fakat excelde bir sütun için 1048576 satır limiti var ve yetkiyor malesef A sütunundaki satır bittikten sonra B sütununa daha sonra B sütunu bittikten sonra C...

Merhaba arkadaşlar sayfa1'deki J35 hücresindeki veriyi her commandButton ' a tıkladığımda sayfa4'te D32'den başlayarak aralarında 1 boş hücre olacak şekilde yan yana kaydetmesini istiyorum. Yardımcı olabilirseniz çok sevinirim.

Merhaba aşağıdaki ilk fotoğrafta olan malzemenin açık siparişini ikinci fotoğraftaki stok sayfasında I,J,K,L,M satırlarına yan yana getirmek istiyorum. Yardımcı olacak biri var mı?

Merhaba Arkadaşlar, Araştırmalarım ve denemelerim sonucunda aşağıdaki makroyu oluşturdum. Bu makro ile beraber şartı sağlanan satırlar belirlemiş olduğum mail adresine mail atılıyor. Şartı sağlamayan durumlar olduğunda ise belirlemiş olduğum hata mesajını bana veriyor ve mail atmıyor. Makro...

Merhabalar. Uygulamam çok basit, "Launch Form" a basınca, çıkan tabloya yazılan inputları "database" sayfasında ilgili sütunlara aktarıp, 2. satıra girilmesi. Eğer 2. sütun doluysa, 2. sütundakileri aşağıdaki sütuna atıp yeni girilen bilgileri 2. sütuna atması. Programı açıp denerseniz ne sorun...

merhabalar aşagıdaki kodda verilerimi c veya d sürücüsü içindeki istasyon kayıt dosyasının içine boş olan son satıra atıyorum ufak bir düzeltmede yardıma ihtiyacım var dahaönce atılan verilerin K stununa aktarıldı yazdırıyorum aktarıldı yazan satırı atmasını istemiyorum kodda düzeltme...

Merhaba Kıymetli Üstatlar, Ekte bulunan dosyamda C Sütununa veri girdiğimde A sütununa otomatik tarih yazdırabiliyorum aşağıdaki kod ile; Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, [C2:C500000]) Is Nothing Then Cells(Target.Row, "A") = Format(Now, "dd.mm.yyyy...