If your data "come from other sources on a monthly basis" I would request:
PositionID
LastName
FirstName
EMail
Phone
...
ManagerPositionID
Where ManagerPositionID is a ForeignKey to PositionID PrimaryKey
Where I work, we also have this type of data kept by 'other sources' (third party...
Can you connect the 2 tables this way:
Headcount.ManagerName = Countact_List.LastName + " " + Countact_List.FirstName
or
Headcount.ManagerName = Countact_List.FirstName + " " + Countact_List.LastName
OK, here is what I've got, assuming:
1. there are no Empty cells in any columns that separate data (columns can have different number of data, but once empty cell is detected, no data below for that column)
2. Data starts in Row 2 (Row 1 is a Header row)
Option Explicit
Sub Kim296()
Dim iCol1...
Kim,
Would you be open to a VBA solution?.
I may have (what Duane described as a) "brute-force VBA to loop through the values in each column and check values against other columns." :)
Update - after spending a lot of time with DBA, we could not make this process happen :(
So, back to the Parameterized query. And it works! (I was so close...)
Dim aryByte() As Byte
Dim cmd As ADODB.Command
Dim L As Long
If FSO.FileExists(PDF_PATH & !FileName.Value) Then
Open PDF_PATH &...
I get it. I can do it on my local DB, but I need special permission to do it to other DB.
I need this permission to just load the data once (I hope) so no security risk.
I did try the Parameterized query, but I could not resolve the adVarBinary line
Dim cmd As New ADODB.Command
...
strSQL = "UPDATE SampleReport SET " & vbNewLine _
& " Body = ? " & vbNewLine _
& " WHERE SampleReportID = ?"
With cmd
.ActiveConnection = CnS...
I have this code in VB6 application - reading PDF file into a byte array:
Dim aryByte() As Byte
Open App.Path & "\ABC_XYZ.pdf" For Binary Access Read As #1
ReDim aryByte(0 To LOF(1) - 1)
Get #1, , aryByte
Close #1
So, at this time I have my PDF in aryByte variable.
Now I need to update an...
Select Distinct VERSION FROM MyTable
You will get:
A
B
C
Now, loop thru the outcome from above and build this SQL:
SELECT TOP (1) * FROM MyTable Where VERSION = 'A'
UNION ALL
SELECT TOP (1) * FROM MyTable Where VERSION = 'B'
UNION ALL
SELECT TOP (1) * FROM MyTable Where VERSION = 'C'
Run...
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.