Konu: Excelde Clipboard a kopyalanan bilgi
Herkese Merhaba,
excelde CTRL + C ile clipboard a aldigim bilgiyi nasil manage edebilirim. Bu bilgileri Cursor e atmanin bi yolu varmi ?
Re: Excelde Clipboard a kopyalanan bilgi
Strtofile(_cliptext,'dosya_adi.txt')
ile bir dosyaya azdırabilirsin.
- cetinbasoz
- Uzman Üye
- Offline
Re: Excelde Clipboard a kopyalanan bilgi
Eger dogrudan o workbooktan alman uygun degilse, (program yoluyla) yeni bir excel workbook ac, paste et. OleDb veya odbc ile datayi al. Kafadan yazinca kabaca:
oExcel = createobject("Excel.application")
oExcel.Worbooks.add
oExcel.Activeworkbook.ActiveSheet.Range('A1').Pastespecial()
oExcel.SaveAs('c:\temp\tempexcel.xls')
oExcel.ActiveWorkbook.saved = .t.
oExcel.quit
lcConn = "Driver={Microsoft Excel Driver (*.xls)};"+;
"DriverId=790;Dbq=c:\temp\tempexcel.xls"+;
";DefaultDir=c:\temp\";"
lnHandle = SQLStringConnect(m.lcConn)
SQLTables(m.lnHandle,"", "SheetNames")
Scan
lcTableName = Trim(SheetNames.Table_Name)
lcOutput = Chrtran(m.lcTableName,' $','_')
SQLExec(m.lnHandle,'select * from ['+m.lcTableName+']',m.lcOutput )
endscan
SQLDisconnect(m.lnHandle)
erase ('c:\temp\tempexcel.xls')
Re: Excelde Clipboard a kopyalanan bilgi
Çetin Hocam, excel'den copy ile clipboard'a alınmış mesela ad ve soyad alanlarını direkt bir cursor'a aktarmanın bir yolu var mı acaba ?
5 22.10.2010 14:01:16 Son düzenleyen, aydinufuk (22.10.2010 14:40:23)
Re: Excelde Clipboard a kopyalanan bilgi
** EXCELDEN YAPIŞTIR..
kabaca şöyle bişey...
Visual Fox Pro
XLEN=ALINES(XAR,_CLIPTEXT,CHR(13))
FOR XN =1 TO XLEN
XLEN1=ALINES(XAR1,XAR(XN),CHR(9))
IF XLEN1=2
SELECT XTABLE
APPEND BLANK
REPLACE XTABLE.ad WITH XAR1(1)
REPLACE XTABLE.soyad WITH XAR1(2)
ENDIF
NEXT
Re: Excelde Clipboard a kopyalanan bilgi
Çok teşekkürler.
- cetinbasoz
- Uzman Üye
- Offline
Re: Excelde Clipboard a kopyalanan bilgi
Excel'den copy ile ad,soyad alani almak mi:) Neden oyle birsey yapayim ki dogrudan Excel driveri kullanarak almak varken.
Re: Excelde Clipboard a kopyalanan bilgi
Hocam, farklı amaçlarla, farklı kolonlarda/satırlarda tutulan bilgilerden istediklerimi seçip foxa nasıl aktarabilirim diye merak etmiştim, ad-soyad olayını örnek olarak verdim.
- cetinbasoz
- Uzman Üye
- Offline
Re: Excelde Clipboard a kopyalanan bilgi
Iyi iste ben de diyorumki clipboardla filan ugrasma, bir kerede datayi al SQL ile isle, ya da daha alirken SQL ile isle.
Re: Excelde Clipboard a kopyalanan bilgi
İlk fırsatta deneyeceğim hocam.