[attachment=6129]Selam dostlar Access ile yeni yeni ilgileniyorum. Bir personel programı var ve bunu kendi kullanımıma göre düzenlemek istiyorum. Tablolara formlara düzenleme yapabiliyorum ama raporları düzenleme yapamıyorum. Sadece baskı önizleme modunda çalışıyor. Bir de mouse ile sağ tık yapılmıyor. Bunun nedeni ne olabilir?

Herkese Merhaba


C: \ GELEN.txt dosyasından ki sıralı veri olan bir dosya

Örnek olarak txt dosyası şöyle olsun
“
1111111122222222333
6666666677777777888 “
sıra 8 8 3 gibi

Bu txt deki bilgileri
C:\ deneme.mbd içindeki ANA_TABLO adlı tablonun alanlara

ALAN_1 e Txt de dosyasındaki ilk 8 karakteri
ALAN_2 ye Txt de dosyasındaki 9 ile 17 arasındaki karakteri
ALAN_3 e Txt de dosyasındaki ilk 18- 20 arasındaki karakteri

Aktarabilmek için nasıl bir kod yazmalıyı

İyi akşamlar.
Arkadaşlar projemde accsess gizle modülü ile pencereleri gizledim. Ancak raporlarda sağ tıklayınca menüler hazırlamıştım (yazdır-mail gönder-vb.) şimdi onlar raporda sağ tıklayınca çıkmıyor. Nasıl düzeltebilirim.

Gizle Modülü:
Option Compare Database
Option Explicit

Global Const SW_HIDE = 0
Global Const SW_SHOWNORMAL = 1
Global Const forumlari_com = 2
Global Const SW_SHOWMAXIMIZED = 3

Private Declare Function apiShowWindow Lib "USER32" _
Alias "ShowWindow" (ByVal hW

arkadaşlar merhaba...
problemim şu,
ekte verdiğim projede kayıtlardan ortada olanlardan herhangi birini sildiğimde sırano alanının tekrar 0dan başlayarak artacak şekilde değişmesini istiyorum...
birde temizle yeni kayıt butonuna tıkladığımda bazen var olan sıra no değerini atıyor. buda kayıtlar arasında silme işlemi yaparken sırano lar çakıştığı için sorun yaratıyor... acaba bu problemi çözmek için sil butonundan sonra kayıt numaralarını tekrar 0 dan başlatabilmek için nasıl bi kod yazmam ge

Merhaba,

Bir kaç tablo üzerinden Sorgu tablosu oluşturarak veri çekiyorum, çekmiş olduğum veriyi alt form a yüklüyorum daha sonra bu sorgu tablosundan çekmiş olduğum veriyi farklı bir tabloya kaydetmek istiyorum.

Bu konuda yardımcı olabilir misiniz?

Şimdiden teşekkürler

Arkadaşlar merhaba,

Aşağıdaki kodlarla Accsessten Excel Combobox'a tablodaki verileri alıyorum. Ancak tablo içinceki ilgili alanda uzunluğu 7 den büyük olanları almak istiyorum.

len(kod)>7 gibi.

Set baglan = CreateObject("adodb.connection")
baglan.Open "provider=Microsoft.ACE.OLEDB.12.0;data source=" & ThisWorkbook.Path & "\HesapPlani.accdb"
CHesap.Column = baglan.Execute("select [Kod] from [Hesap_Plani] order by kod").GetRows
baglan.Close


Desteğiniz için şimdiden teşekkür ederi

Herkese merhabalar;
ekte kendime göre basit hazırladığım dosyada her carinin hareketini ayrı ayrı almak istiyorum.
alınan ve verilen hareketleri ile dipte toplam alınan toplam verilen ve bakiye gözükecek şekilde ayarlamaya ihtiyacım var. yardımlarınız için şimdiden teşekküre ederim.
saygılar

merhabalar,
dosya içindeki tüm hataları düzelttim. herbir carinin ayrı ayrı ekstresini oluşturamıyorum. bu işlemi oluştururken carinin tüm alış ve satış hareketlerinin görünmesi ve toplam alış satış ve bakiyenin görünmesini istiyorum. yardımlarınızı rica ederim
saygılar

Sayın yetkili merhaba,

ekte hazırladığım örnek tabloma şunu yapmak istiyorum. bende hata verip durdu. bütün her yerde örnekler "," benim ";" bu şekilde olması gerekiyor.  bu farktan dolayı bir şeylerim eksik oluyor.

yapmak istediğim,

1) dış veri olarak exceli hazırladım. access'a getirdim.

2) Form da yer alan malzeme seçimi yapıldıktan sonra, birim ve fiyatı "malzemefıyat" tablosundan otomatik gelsin.

Teşekkür ed

Öncelikle merhaba,
Üzerinde çalıştığım bir projede accsess ile aynı klasörde buluna hazır excelde yapılmış bir şablona veri aktarıyorum.
kullandığım kod

 Dim objExcel

Dim objWorkBook

Set objExcel = CreateObject("EXCEL.APPLICATION")

objExcel.Visible = True

Set objWorkBook = objExcel.Workbooks.Open(CurrentProject.Path & "\raportemp.xlsx")



objExcel.Range("E15") = Dlookup ("[id]", "ExceleVer")

objExcel.Range("E16") = Dlookup ("[ekipman_no]", "ExceleVer")





End Sub

 
merak etti