Recent content by xlStar

I have a VB6 program which work for years until recently my company has moved from PCs to Citirx Environment using WYSE terminals (we no longer have PC now). This means that all the software are installed centrally on a server instead of C:\ drive (base PC). Unfortunately this has upset the...

I have a VB6 program which work for years until recently my company has moved from PCs to Citirx Environment using WYSE terminals (we no longer have PC now). This means that all the software are installed centrally on a server instead of C:\ drive (base PC). Unfortunately this has upset the...

I am trying to extract result from an existing query but with or without where clause. The query is if myDepartment is * then display everything else just display certain department name. The codes below seems to work BUT only where myDepartment contain only one word i.e. "Sales" but when it...

Thank you. I've managed to work it out by... Me.subReport2.SourceObject = "subR2

I am (trying) to design one Main Report with a sub-report containing Financial Information. However, there are 6 different Financial Information subreports and only one is required. How do I get the Main Report to select one particular subreport? The Main Report included a UnBound subreport...

Sub GetWordData() Dim appWord As Word.Application Dim doc As Word.Document Dim cnn As New ADODB.Connection Dim rst As New ADODB.Recordset Dim strDocName As String Dim blnQuitWord As Boolean On Error GoTo ErrorHandling strDocName = "U:\CustomerSupport\Returns\" & _ InputBox("Enter the name...

The table is already set up with 12 fields, one of them is called "Narrative" as is set to "Memo". The VBA is inserting records from MS Word. It all working fine apart from that I want "Narrative" to accept >255 field size as one record in MS Word is 372 charactors long. I have manage to...

I am trying to Import data from Word Form into Access. One Access's column is named "Narrative" and Data Type is set to Memo. The Word Form maximum length is 1000 for this same field. However, the ADO VBA code is only importing 255 data whereas this field on Word has 372. How can my code...

Is there a way to have one query to work on many table with same column names where the table name only differ by number? For example...Table Name.. Table1 Table2 Table3 all have column column names, so on the query can I add a parameter to the Table name like FROM Table[MyNo] I just wanted...

Previously my Excel VBA works OK sending out email until IT had switched off our POP3 and SMPT email address as one year ago we moved to Exchange Server and now uses Outlook Web Access. My code... oEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") =...

Create new function in VBA Macro; below is an example to meet your requirement... Public Function CountIfSpec(OneCell As Range, Low As Integer, High As Integer) If OneCell <= Low Then CountIfSpec = 3 ElseIf OneCell >= High Then CountIfSpec = 1 Else CountIfSpec = 2 End If End Function

Hello. I have a word document containg several pictures from Excel spreadsheet. These pictures were entered into Word using the Paste Special as 'Microsoft Excel Worksheet Object; without paste links. I need to write a macro in Word to check the validations of the amounts within that embeded...

Hi. I've been told off for not applying Stars to other users who responded to my threads, however I am not applying any stars for this thread. Please be aware that INDIRECT.EXT is NOT useful as I hoped it would be. I have downloaded the software to obtain the AddIns to use the INDIRECT.EXT...

Below is tipical code to show custom menu etc... With .Controls.Add(Type:=msoControlButton) .Caption = "Time Sheet" .FaceId = "1106" .OnAction = "OpenTimeSheet" End With On Standard Excel (2002) you can able to 'Edit Button Image' via the Customize Dialog box. It is...

Hello, my VBA is working fine, it is creating a report base on same reports from several files - these files are varies in row numbers. The formula got too long ... =+'S:\fincon\(3)OneWorldAccy\Budget 08-09\test\[BUDG0809-RES-DCX.xls]D Report'!$B$30+'S:\fincon\(3)OneWorldAccy\Budget...