• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Soru EXCELDEN UDF'YE (UYAP YAZILIM) TABLO AKTARIMI

Katılım
21 Aralık 2019
Mesajlar
211
Excel Vers. ve Dili
Office 2016
Sevgili Üstadlarım merhabalar;

Ben bir konu sormak ve gelecek cevaba göre sorumu yüklemek istiyorum çünkü mümkünse bunu yapmak sorumu gereksiz olabilir. Adliye ile ilgili konularda biliyorsunuz UDF isminde bir programı kullanıyoruz bu da anladığım kadarıyla bir metin programı. Excelde hazırladığımız bir programı dilekçe hazırlarken buraya yapıştırdığımız zaman boş bir şablona tablo kabul etmediği için yapı bozuluyor ve düz metin gibi algılıyor. Ama belki bunun bir yolu vardır bir şekilde diye düşündüm ben araştırdım ama bulamadım. Bunun mümkün olup olmadığını öğrenmek istiyorum.
Saygılarımla
 
UDF dosyaları biraz karışık bir yapıya sahip. Ne yazık ki bu konuda yeterli döküman da bulunmuyor.

UDF lerde metinsel arama programı yazmıştım. Anladığım kadarı ile,
content.xlm dosyasında metinsel ve biçim bilgileri bulunur.

Sabit bir font ve biçim belirlenerek belki bu dosya hazırlanıp. ZIP programı ile udf ye dönüştürülebilir.
Ama oldukça zahmet bir iş.


XML:
<?xml version="1.0" encoding="UTF-8" ?> 
- <template format_id="1.7">
- <content>
- <![CDATA[ 

T.C.
ANTALYA 3.İCRA MÜDÜRLÜĞÜ  DOSYA NO :2013/755 Esas  
  
TALEP


BORÇLU  :ORHAN ..........OĞLU - T.C. Kimlik No:.............................

    
Yukarıda dosya numarası belirtilen, borçlu adına kayıtlı taşınmazların tespiti için UYAP’ tan sorgulama yapılmasını ile borçlu adına posta çeki hesabı olup olmadığının tespiti için UYAP’ tan sorgulama yapılmasını talep ederim. Saygılarımla.


  ]]> 
  </content>
- <properties>
  <pageFormat mediaSizeName="1" leftMargin="56.7" rightMargin="56.699999999999974" topMargin="56.7" bottomMargin="56.699999999999974" paperOrientation="1" headerFOffset="20.0" footerFOffset="20.0" /> 
  </properties>
- <styles>
  <style name="default" description="Geçerli" italic="false" bold="false" FONT_ATTRIBUTE_KEY="javax.swing.plaf.FontUIResource[family=Tahoma,name=Tahoma,style=plain,size=11]" size="11" family="Tahoma" /> 
  <style name="hvl-default" description="Gövde" size="12" family="Times New Roman" /> 
  </styles>
- <elements>
- <paragraph Alignment="3" resolver="hvl-default">
  <content Alignment="3" resolver="hvl-default" bold="true" size="12" family="Times New Roman" startOffset="0" length="6" /> 
  </paragraph>
- <paragraph Alignment="3" resolver="hvl-default">
  <content Alignment="3" resolver="hvl-default" bold="true" size="12" family="Times New Roman" startOffset="6" length="27" /> 
  </paragraph>
- <paragraph Alignment="3" resolver="hvl-default">
  <content Alignment="3" resolver="hvl-default" bold="true" size="12" family="Times New Roman" startOffset="33" length="23" /> 
  </paragraph>
- <paragraph Alignment="3" resolver="hvl-default">
  <space Alignment="3" bold="true" resolver="hvl-default" size="12" family="Times New Roman" startOffset="56" length="1" /> 
  </paragraph>
- <paragraph Alignment="3" resolver="hvl-default">
  <space Alignment="3" bold="true" resolver="hvl-default" size="12" family="Times New Roman" startOffset="57" length="1" /> 
  </paragraph>
- <paragraph Alignment="3" resolver="hvl-default">
  <content Alignment="3" resolver="hvl-default" bold="true" size="12" family="Times New Roman" startOffset="58" length="1" /> 
  </paragraph>
- <paragraph Alignment="1" resolver="hvl-default">
  <space size="12" family="Times New Roman" startOffset="59" length="1" /> 
  <content bold="true" size="12" family="Times New Roman" startOffset="60" length="7" /> 
  <content Alignment="3" bold="false" resolver="hvl-default" size="12" family="Times New Roman" startOffset="67" length="1" /> 
  </paragraph>
- <paragraph Alignment="3" resolver="hvl-default">
  <content Alignment="3" bold="false" resolver="hvl-default" size="12" family="Times New Roman" startOffset="68" length="1" /> 
  </paragraph>
- <paragraph Alignment="3" resolver="hvl-default">
  <content Alignment="3" bold="false" resolver="hvl-default" size="12" family="Times New Roman" startOffset="69" length="77" /> 
  <content size="12" family="Times New Roman" startOffset="146" length="1" /> 
  </paragraph>
- <paragraph Alignment="3" resolver="hvl-default">
  <content size="12" family="Times New Roman" startOffset="147" length="1" /> 
  </paragraph>
- <paragraph Alignment="3" resolver="hvl-default">
  <content size="12" family="Times New Roman" startOffset="148" length="22" /> 
  <content bold="true" size="12" family="Times New Roman" startOffset="170" length="193" /> 
  <content bold="false" size="12" family="Times New Roman" startOffset="363" length="27" /> 
  </paragraph>
  </elements>
  </template>
 
Sevgili Asri;
Ekte bir tablo oluşturdum. Bu tablo sabit bir tablo ve bazısında 1 satır bazısın da 10 satır var. Bunu yapabilirsem çok güzel olacak. bir firmanın dava işlemleri var ve 100'e yakın dava dilekçesi var. Bu tabloyu UDF'ye atabilmek benim işlemlerimi çok kolaylaştırıcak. Yoksa bütün bunları her bir dilekçede "1 nolu kalem falanca Gtip numarasında birim fiyatın 3 Usd den 5 Usd çıkarılması sonucun da şu kadarlık bir yurtdışı gider oluşmuştur bundan dolayı misal 3.000 usd fark sonucu şu kadar vergi fazla tahsil edilmiştir" gibi bir şeyi tek tek yazmak zorunda kalacağım yada bu tabloyu bazı formüllerle uygun hale getirmek durumunda kalacağım. Açıkçası ne yapabilirim bilmiyorum. Aslında tablolar daha geniş bir yapıya sahip yani 10 değil 15 sütun gibi ama ben kısaltmaya çalıştım. yüklemiş olduğun dökuman için neler yapabilirim noktasında maalesef hiç bir fikrim yok.
 

Ekli dosyalar

Diğer türlü tabloyu formalize ettim ve birleştir formülüyle kendime göre bir veri oluşturdum. (M SÜTUNU) Ancak sayıları çekerken hücrede 13.793,88 yazarken formül sonucunu 13793,882 olarak algılıyor. Burayı düzeltmeme yardımcı olursanız sevinirim. Düzeltmek istediğim sadece M SÜTUNU'nda yazdığım formül..
 

Ekli dosyalar

Sayın İsmailem tşk ederim. Yöntemi değiştirdiğim için yukarıda son tabloda ki M sütunundaki formülü bile revize yapmak işimi görür.
 
4. Mesajım ile ilgili yardımcı olabilecek birisi var mı acaba ?
 
Function metinleştir(s As Range)
metinleştir = s.Text
End Function

Hücrede Kullanımı =metinleştir(b2)
 

Ekli dosyalar

https://www.autohotkey.com/ programını kurunuz. Ardından 11 sütunluk ve 9 satırlık tablo açınız udf dosyasından. listeaktar programını açınız. ve ilk sütunun ilk satırından f4 basınız.
 
Geri
Üst