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...
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...
I am trying to print every items listed on the "CurrentPageList" within the Pivot Table.
Below is an extract from VBA Excel Help Page...
pvtField.CurrentPageList = "[Product].[All Products].[Food]"
How can I count the number of items within CurrentPageList so that I can go thorugh each items...
Use can use either...
=VLOOKUP(TEXT(A1,0), C1:C3,1,FALSE)
=VLOOKUP(VALUE(A1), C1:C3,1,FALSE)
Use the =IsText(A1) formula to determine what the
format a certain cell is.
The IF formula is good...
=IF(IsText(A1))=true,VLOOKUP(TEXT(A1,0), C1:C3,1,FALSE),VLOOKUP(VALUE(A1), C1:C3,1,FALSE))
Hello there.
This VBA scripts in Excel 2002 doesn't seems to work for people with Excel 2000 or earlier.
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowFormattingRows:=True, AllowFiltering:=True
How can I overcome this, i.e the user should be allows to use the...
Not quite right.
The User is sending the email attachment to me. I wanted them to email the attachment to me but their email address needed to be on cell A1 on the attached file.
i.e Itm.To = myname.mysurname@mycompany.com
is there any Itm.From available.
Range("A1").Formula = Itm.From
Just a quickie, I have created a form on Excel which when completed by the recipitant is mailed back to me via a button which I have placed on the form and written the macro for.
What I wondered was you might know how I can get the users' e-mail address. So that when they click the send button...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.