Pdf Olarak Kayıtta Problem Ve Yeni Bir Hesaplama Ekleme - Baskı Önizleme +- AccessTr.neT (https://accesstr.net) +-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html) +--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html) +--- Konu Başlığı: Pdf Olarak Kayıtta Problem Ve Yeni Bir Hesaplama Ekleme (/konu-pdf-olarak-kayitta-problem-ve-yeni-bir-hesaplama-ekleme.html) |
RE: Pdf Olarak Kayıtta Problem Ve Yeni Bir Hesaplama Ekleme - feraz - 14/12/2023 Bu dosyayı bir deneyin. Sub litre_Kg_Maliyetleri_Getir(ByVal syf As Worksheet) içindeki alttaki yeri gabiba siz eklediniz.Bilmiyorum doğrumu ve yanlışsa resimdek, verilern geldiği şekilde dosyayı ekleyin test edeyim. Kod:
.Cells(araToplamLT, "D").Value = .Cells(araToplamLT, "D").Value + .Cells(araToplamLT, "D").Value * .Cells(araEkgider, "D") RE: Pdf Olarak Kayıtta Problem Ve Yeni Bir Hesaplama Ekleme - feraz - 14/12/2023 Bu arada birşey farkettim. Seçenek için yaptıklarımızda gizleme ve gösterme yapınca Garanti edilen içerik alanındaki veriler değişmiyor heralde onlarda değişecek. RE: Pdf Olarak Kayıtta Problem Ve Yeni Bir Hesaplama Ekleme - hnakis - 14/12/2023 (14/12/2023, 10:16)feraz yazdı: Bu dosyayı bir deneyin. o kısmı ben ekledim. hesaplamada sorun yok. seçenek kısmında bir sorun yok. içerik seçilmediğinde garanti edilen içerik kısmında görünmüyor, olması gerektiği gibi. elinize sağlık sayın feraz RE: Pdf Olarak Kayıtta Problem Ve Yeni Bir Hesaplama Ekleme - hnakis - 14/12/2023 Sayın Feraz; açılır listeyi Maliyet hesaplama çalışma sayfasından veri doğrulama ile almışsınız. ben veri doğrulamayı her hangi bir çalışma sayfasından almayıp liste gibi yapsak olmaz mı? Sub VeriDogrulama_Maliyet(ByVal hcr As Range) Fonksiyonu var. Maliyet hesaplama çalışma sayfası olmak zorunda sanırım. RE: Pdf Olarak Kayıtta Problem Ve Yeni Bir Hesaplama Ekleme - hnakis - 14/12/2023 Açılır liste kutusunu bir çalışma sayfasına bağlamadan yaptım. kodu da ; Sub VeriDogrulama_Maliyet(ByVal hcr As Range) Dim liste As Variant Dim son As Long ' Açılır menüde görünecek değerleri belirtin liste = Array("0.25 lt Maliyet", "0.5 lt Maliyet", "1 lt Maliyet", "5 lt Maliyet", "10 lt Maliyet", "20 lt Maliyet") With ThisWorkbook.Worksheets("Maliyet hesaplama") son = .Cells(.Rows.Count, "B").End(xlUp).Row With hcr.Validation .Delete .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _ xlBetween, Formula1:=Join(liste, ",") .IgnoreBlank = True .InCellDropdown = True .InputTitle = "" .ErrorTitle = "" .InputMessage = "" .ErrorMessage = "" .ShowInput = True .ShowError = True End With End With End Sub değiştirdim. sizce sorun olur mu? RE: Pdf Olarak Kayıtta Problem Ve Yeni Bir Hesaplama Ekleme - feraz - 14/12/2023 Abey değişiklik yaptığınız zaman kodlara aynı şeyleri tekrar yazıp düzeltmektense 1kg,1 lt ve toplam lt olanları function yaptım ordan kolayca bulunur artık. Deneyin sorun varsa düzelteyim. Dediğiniz array olarak sorun olmaz ama veri doğrulama içine almak için koda eklemelisiniz sayfa yerine. (14/12/2023, 11:27)hnakis yazdı: With ThisWorkbook.Worksheets("Maliyet hesaplama") Yukardaki ve end with kısmını ve Dim son As Long burayısilebilirsiniz bence array ile yapacaksanız. |