Modules & VBA :: Rename Table To First Column Heading
Feb 25, 2015
I am importing different excel sheets into Access dB using a file dialog. The importing works fine however, I would like to rename the tables once they are imported to the name of the first column heading. Where exactly would I ad the name change at in this code?
#' Open the EXCEL file and read the worksheet names into a collection
Set colWorksheets = New Collection
Set objWorkbook = objExcel.Workbooks.Open(StrFileName, , blnReadOnly, , _
strPassword)
For lngCount = 1 To objWorkbook.Worksheets.Count
colWorksheets.Add objWorkbook.Worksheets(lngCount).Name
[Code] .....
View Replies
ADVERTISEMENT
Jul 25, 2005
Hopefully someone can help....
I'm trying to change the name of a column in a table using SQL. I've tried different combinations but always get
"Syntax error in Alter Table statement"
SQL I've tried
alter table tblImport
rename column F1 to [Date];*
alter tblImport
rename column F1 to [Date];
alter table tblImport
rename F1 to [Date];
I've checked this out via some SQL sites & think the first version (*) is correct....can someone throw light on this? I'm using Access2000
View 3 Replies
View Related
Jul 16, 2013
I'm having about 100 table with the following name: phres01, phres02, phres03 .....phres100
And I need to rename them to ph01, ph02, ph03 ... ph100 respectively
thus removing the "res" part of each table. Since the ctrl+h doesn't work for access LOL im in hella trouble.
View 10 Replies
View Related
Mar 23, 2013
I have a cross tab query which give result like this
Date No. BoxItem1 BoxItem2 Item1 Item2
1-2-12 1 15 15 10 15
1-2-12 2 10 10
1-2-12 1 15 15
1-2-12 1 10 5 5 1
I need to BoxItem1 come after item1 and also col heading only box.Is it possible or not?
View 1 Replies
View Related
Aug 23, 2005
Hi,
I have a crosstab query that groups by week to obtain columns for monday to sunday. Is there a way to obtain the actual dates that these columns represent?
Any help would be much appreciated.
View 1 Replies
View Related
Feb 7, 2006
Hi,
Not able to add more column heading in cross tab query.
I tried to change the query properties to add more column headings as given below.
In the query's Design view, right-click up in the area where your tables are shown and choose "Properties" from the right-click menu. The 3rd line down is for Column names. Enter what you need there.
Evn after doing it. i am not able to .
Whn I try to save or view the datasheet it says. to create a crosstab query u need to have one or more row headin one column headin and one value.
please help. its ver urgent.
thanks in adv..
View 1 Replies
View Related
Sep 10, 2014
I am coming back to an Access 2007 database that I put together some time ago. I need to simply delete a column and its associated heading in a report and I can't remember how to do it!!
I have attached a few screen shots.
001.jpg is of the actual report and 002.jpg is what the report looks like in Design view. If I try to use Layout view it displays the message "Layout View is Unavailable for this report".
View 14 Replies
View Related
Jul 2, 2014
I am using access 2010. I need to rename a table when I import the a new table. But I can't get the docmd rename code to work. I also want to append the current date on the end i.e.
docmd.rename, "tblOldTable(Currentdate)", actable, "tblOldTable"
doesn't work.
View 10 Replies
View Related
Oct 23, 2005
Hi:
MS Access
In query:
I write
ALTER TABLE table_name
RENAME COLUMN old_name to new_name;
But, it doesn't work, because "Rename" is NOT avaliable.
How can I fix that?
Thanks.
View 1 Replies
View Related
Feb 8, 2007
Hi,
i want to rename a column name "id to concept_id" through sql query
please send me the query.
as soon as possible
thanks in advance..
View 7 Replies
View Related
Nov 20, 2014
I have fields on the main menu where folks put in a start and end date prior to running a report. I'm doing a monthly report that pulls current month, and two prior months of data. For example, the user selects a date range of 10/1/14 to 10/31/14 the report will show August, September and October results.
I need the column headings to change each month depending on the date range they select to run the report so in November they will pull 11/1/14 to 11/30/14 and get September, October and November.
The headings for the columns would then adjust.
I put an unbound text box with the formula as follows in the control source of the report page header to pull the month that is equal to the current month minus two (I'm just showing one of the column headings formula):
=Format([Forms]![Main Menu]![EndDate]-2,"mmmm yyyy")
This is not working. It's pulling the current month which I have set to run for October so it should show August 2014.
View 3 Replies
View Related
Sep 30, 2005
Is there any way to use a select query where it will select the values off of my database but temporarily use a different column name for one of the columns???
I have 3 different item names stored in my main table. When I compare this to another table, I want to select one of the item names and just pass that as item_name. This way, I can have the same compare routine instead of writing a different compare routine for each item name. Any way? Thanks a lot for the help in advance!
View 1 Replies
View Related
Oct 23, 2006
Hi all, this is my first post.
i have created a simple access database for keeping student and attendance record.
student table fileds are:
studentId - primary key
forname
surename
dob
gender
accademic year
attendance table fields:
studentid - primary key
date - primary key
attendance (yes/no boolean field)
paid (yes/no boolean filed)
this database is just ment to keep records of students attending at particualr dates.
for example if attendance table cotain records like:
http://www.crazyanime.pwp.blueyonder.co.uk/table.JPG
for the form layout, what i want to do is
http://www.crazyanime.pwp.blueyonder.co.uk/form.JPG
i want this to be editable. how would i do this using access form, or do i have to wrtite VBA code
PLUS i want the form to automatially have new records when i add for example a student, with ID 10011 OR if i add new records for a different date say 11/11/2006, then i want that to be viewd on the form just like the 21/09/2006 and the 04/11/2006.
please help :) been looking for a solution for long time.
thanks
View 4 Replies
View Related
Sep 30, 2013
I have below vba code in a sub that opens word application and generates the data from a table based on criteria provided thru a form.
These lines are smoothly working..
But I need to place some headings in first line or second line of the document and then to start the table information to appear in the doc.
I tried to place my company name below way (see bold lines);
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim I As Integer
Set db = CurrentDb()
Set rs = db.OpenRecordset("SELECT * FROM T_CustomerMaster WHERE SALESMANCODE='" & Forms!F_ReportMaster!TxtRepCode & "' order by custcode;")
WordSetup
doc.Tables.Add Range:=doc.Range, numrows:=1, numcolumns:=5
'Trying to place main heading
'doc.Range(1, 0).Text = "fsdafds"
[Code] ....
But the table starting from column 1 and cell 1 till data ends up.
Finally I converted my trial lines to remark as it is not working at all.
View 8 Replies
View Related
Jan 6, 2005
Hi,
I'm trying to get a crosstab to output some columns that dont have data. e.g. a feedback survey with no low scores.
Everytime I put something in the Column Headings property the query becomes "too complex" and won't complete. I have tried just putting "Question" which is a Column that should always output.
Any ideas?
Thanks,
Darren H
View 1 Replies
View Related
Dec 17, 2013
I want to rename a report by clicking a command button on a form. I have this simple code in the click event:
Dim strReportNameNew As String
Dim strReportNameOld As String
strReportNameNew = txtChangeTo.Text
strReportNameOld = txtChooseReport.Text
DoCmd.Rename strReportNameNew, acReport, strReportNameOld
The code fails with this error message:
Microsoft Visual Basic
Run-time error '29068'
Household Labels cannot complete this operation. You must stop the code and try again.
I am able to rename the report manually.I have searched but been unable to find out what is causing this error.
View 6 Replies
View Related
Sep 23, 2015
I am unsure of how to choose my row heading when I use the create table wizard. It gives me the option to use the first row but my row heading is actually row 17.
View 6 Replies
View Related
Dec 13, 2013
I'm using 2013. The first version of my code works great. It opens the correct report and attaches it to an e-mail as a pdf with all of my text etc.
Code:
Private Sub btnEMail_Click()
On Error GoTo errHandler
Dim strReport As String
Dim vMsg As String
Dim vSubject As String
Dim strWhere As String
strReport = "RptJobDSD"
[Code] ....
The problem I have is I would like to rename the pdf, so instead of "RptJobDSD" everytime, it can have some fields [DSDDate] and [JobID] etc.
Before trying the fancy field stuff I thought I'd try just "DSD Test" and see if I could rename it in the first place!
I added this and am getting - Error(32004) - The control name 'RptJobDSD' is misspelled or refers to a control that doesn't exist.
Code:
DoCmd.OpenReport strReport, acViewPreview, , strWhere
DoCmd.SetProperty strReport, acPropertyCaption, "DSD Test"
DoCmd.SendObject acSendReport, strReport, acFormatPDF, , , , vSubject, vMsg, True
My confusion comes as the OpenReport and SendObject recognise strReport why doesn't SetProperty?!
View 2 Replies
View Related
Jun 25, 2013
This code is supposed to loop around a directory of photos (named after a project), and then copy a new photos (from another directory) to this folder, numbering them and the logging them in a table tphotos.The first time a copy photos to a new directory the code works fine. And I think I had it working fine before, but now when I copy photos to a pre-existing directory that has already photos, it only overwrites the first photo, instead looking for the last photo and attributing the new photo number n+1.
I've done debug.print in the code, and it looks like is not going into If NewFileName = f1.Name, therefore doesn't compare the newfilename with the files in the folder.
Code:
Private Sub cmdAddPhoto_Click()
Dim fs, f, f1, fc, s
Dim fDial As FileDialog
Dim SourcefileName, destDir, FileExt, NewFileName, prjID As String
Dim intSel, FileNumber As Integer
Dim varSelFile As Variant
Dim rsPhoto As Recordset
Dim myDB As Database
[code]...
View 5 Replies
View Related
Jan 10, 2006
In MS Access , form,
how can write the VB for rename the table name?
If I created the table named "app"
then I made a button for rename the table to "aaa"
How can I write?
Thanks.
View 1 Replies
View Related
Apr 24, 2015
I'm trying to use VBA to update a new column in a table with info I already have in another table.The table I want to update is an inventory details table, it has around 25,000 records. I added a column called "UnitCost", of course the column is empty for all 25,000 records so I would like to fill it easily using DoCmd.RunSQL "UPDATE" feature.
I use that through-out the program however I'm unable to connect the dots for this one.What it needs to do is update "UnitCost" in "InventoryDetails" from "Products" where "InventoryDetails.ProductNumber" = "Products.ProductNumber"
The "Products" table has all the different unit cost, it just need to be placed in the "InventoryDetails" table for every record. Of course product1 needs products1 unit cost and product2 needs products2 unit cost, etc.
View 1 Replies
View Related
Dec 14, 2005
I've been asked to come up with a way (one-off) of renaming over 100 hundred tables. The table are all called "STUD_ADMIN_blah". We need to remove the "STUD_ADMIN_" part of the table name.
Is there a nice easy way of doing this without having to physically rename each table individually?
Thanks in advance.
Steve
View 14 Replies
View Related
May 23, 2012
I made the novice mistake of originally naming a field street #, so I changed it. I went to every place I thought it might affect and still it will not let me access my forms. Is there anyway to find all of the locations it might be and remove it? I am using Access 2010
View 1 Replies
View Related
Jan 12, 2005
This is complex, but here goes.
I am copying many many music cds to my hard drive. However, the song file names on the cds are track01.mp3, track02.mp3, etc. I have all the real songnames for each cd listed in the database. I need a way to rename the songs with their real names one cd at a time. My thought was to populate one table with the directory and filenames (track--) of the songs and populate another table with real songnames from the database. Then, somehow, rename the files. I'm lost. I hope someone can help!
View 1 Replies
View Related
Apr 18, 2014
I was working on my DB, cleaning up some of the field name that were cumbersome and everything worked fine. Today I was doing some follow up work and I cannot change the field names. All I want to do it change the name of a field from CITY to City, but it won't let me do it. I have tried, change from single click to double click, but I was already using double click to open an object; unchecked Auto-Correct, still nothing.
Yesterday I was able to modify a name from Actions to Action (simply deleting one letter. And State/Province to StateProvince. Worked fine. What bothers me is that I have been able to change a field name before and now I can't. I have tried compact and restore, etc.
View 14 Replies
View Related
May 4, 2015
I made a Point of sale using a form with different sub-forms which have command buttons on it. They basically run a append query from tblStockMain to table cash and on to transactions. That works all fine no problem.
The one missing thing to make it sweet is to rename the command buttons automatically from tblStockMain. With other words, if I change a product in the table it would change the name on the button and the picture if possible with it.
Is there a way to do it?
View 2 Replies
View Related
