Search results for query: *

I apologize for delay, but my pc had some problem. This is the result: SELECT RSDR.CTIPSOM, RSDR.DANNCON, RSDR.NRIF, RSDR.CTERINS , RSDR.COPRINS, RSDR.DDATINS, RSDR.COPRAGG , RSDR.DDATAGG, RSDR.SSTA, RSDR.COPR, RSDR.DCON , RSDR.NOPE, RSDR.CFIS , RSDR.CTIPARC, RSDR.IIMP ...

I use spufi before embed code in JCL. Thank you, SkipVought, it works fine. Candu si tene su 'entu es prezisu bentolare.

My router has a DNS problem. Now I try. Thenks for now. Candu si tene su 'entu es prezisu bentolare.

Link does not work... Thanks Candu si tene su 'entu es prezisu bentolare.

This is clear, but if I want join to a field in another table, I'm looking for a function for SELECT MT1.field1, MT1.field2, MT2.field1 in MyTable1 MT1, MyTable2 MT2 WHERE FUN(right(MT1.field4, 4)) = MT2.field2; (MT2.field2 is numeric) Candu si tene su 'entu es prezisu bentolare.

The problem is not to decode the sign, but the number. In other words, I try a function like f(right(myfield, 4)) returning 1578. Thanks Candu si tene su 'entu es prezisu bentolare.

Within Spufi I'm reading a field that contains three fields values in a string. It appears as 01F0058 0C2017C in hex, where 0001758+ is the field I would use for join with an other table. How can I convert this in numeric? Thanks to all Candu si tene su 'entu es prezisu bentolare.

Your pgm on my work's pc sounds very well. I think the problem is not Xp. Candu si tene su 'entu es prezisu bentolare.

Using Add method I think it would work: Sub xx() Dim w As Object On Error GoTo err Application.DisplayAlerts = False Do Set w = Workbooks.Add("obj.xls") ' .... w.SaveAs Filename:="obj.xls" w.Close Loop Exit Sub err: Debug.Print...

Read this: http://www.add-ins.com/support/out-of-memory-or-not-enough-resource-problem-with-microsoft-excel.htm Candu si tene su 'entu es prezisu bentolare.

Option Explicit Sub cc() Dim strRange As String, x As Boolean strRange = "A1:B2" x = SelectRange(strRange) End Sub Function SelectRange(strRange) As Boolean SelectRange = Range(strRange).Select End Function Candu si tene su 'entu es prezisu bentolare.

Try this: Option Explicit Sub xxx() transpose Range("G2:G5"), Range("G1:J1") End Sub Function transpose(f As Range, t As Range) Dim i As Integer For i = 1 To f.Count - 1 t.Item(i) = f.Item(i) Next End Function Candu si tene su 'entu es prezisu bentolare.

For example,if cell J2 needs to become G2 and cell J3 needs to become H2: Range("J2:J3").Select Application.CutCopyMode = False Selection.Copy Range("G2").Select Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=True Candu...

Maybe it's a forum wrong section. I move question to Visual Basic(Microsoft) ActiveX Controls and DLLs Forum. Candu si tene su 'entu es prezisu bentolare.

Using vb6 I created a DLL with many functions I use in vba. Now I would know wich program is calling my DLL (within it). If excel is calling it, GetModuleFileName function of kernel32.dll returns c:\..\..\excel.exe, but I would know wich workbook is running (Application.ActiveWorkbook.FullName)...

Using vb6 I created a DLL with many functions I use in vba. Now I would know wich program is calling my DLL (within it). If excel is calling it, GetModuleFileName function of kernel32.dll returns c:\..\..\excel.exe, but I would know wich workbook is running...

Very well, it works fine. Thank you, MajP. Candu si tene su 'entu es prezisu bentolare.

I tried to modify plus-minus option inserting icons. In vb6 it works fine, loading images in a ImageList control, then refering it using TreeView1.ListImage = ImageList0 In this version of treeview control (access 2007) ImageList property is not available. How can I do? Thanks in advance...

This is my code in vba: Sub yy() savefile "C:\myDir\Aaa.pdf", "C:\myDir\Aaa.txt" End Sub Sub savefile(ByVal sfile As String, ByVal txtfile As String) Dim acroApp, acroAV, acroPD, jso As Object On Error GoTo ErrHandler Set acroApp = CreateObject("AcroExch.App") Set acroAV =...

Using an example I tried to obtain to save a pdf file in txt format within acrobat 8 professional. This is the code: mySaveAs = app.trustPropagatorFunction(function(doc, path, type) { app.beginPriv(); doc.saveAs(path, type); app.endPriv(); }); mySaveDoc = app.trustedFunction( function (doc...