Search results

that's a much neater solution in all fairness

that's only a quick bit of sudocode not sure how valid it is when put into use

from what I was reading this morning when looking into file names and dialouge boxes in seperat contexts this morning it should be possible to count the length into the string of the last "\" then cut the string from the charcter following that? will post some code in a min Dim x as long...

try for the path element currentproject.path & "\mobile.txt" this gets around all the network mapping issues

Posted below is what I ended up with, it works and all the formatting comes out perfect but it's a slow process takes at least 15 mins on this delightful piece of modern computing I'm working on (read workstation circa 2004) would your function be any quicker? edit: have amended code to the...

see I thought that and that's what i did to start with but they all end up coming out as tabs with just the first value and come the second iteration of the loop you get the subscript out of range error edit: so I thought what the hell I might well have done something wrong and tried it...

Ok this is a new one I've not seen anywhere and I'm wondering if any of you guys can offer some advice on what on earth is going on here. Basically this process rips a load of data from a query and dumps it into a new sheet in a workbook. and there in lies the problem, in order to get it to...

This should do what you need just written it for the same situation so if you press select all with anything but all of them selected it selects them all but if they're already selected it clears them Public Function LstSelectAll(Lst As ListBox) As Boolean Dim lngRow As Long Dim...

Got there in the end, for anyone else who needs to load a module into excel from access to run some macros code as follows Note. this work to do a load of formatting to a newly created spreadsheet in order to display the data how it's needed for the end user DoCmd.TransferSpreadsheet...

I've got a series of macros I've written in excel, is there a way of saving the module so it can be loaded into access and run on a newly created spreadsheet? I'm currenly looking at something like this where the .ManipulateData is the last macro in the module that runs through the others in...

interesting it would appear that the above formats based on the D column from the row below, any ideas?

ta I thought it would be a case of implimenting it over 2 queries which is what i had it doing already, I really need to stop posting questions on here then answering them myself before ppl reply lol

how do i convert that into something in VBA that i can auto run on some data outputted from access? Edit: written the following macro seems to work just doesn't look too neat Sub Format() Dim myRange As Range Dim ref As Range Set myRange = Range("E2:AC100") Set ref = Range("D2:D100") Dim...

having a right mare of a time getting some conditional formatting working based on some data exported from access basicall the range of data is D2:AC100 D2:D100 contains the value i want to base the formatting on for each cell in the rest of the range E2:AC100 If the cell is empty do...

apologies for creating a new thread about what seems to be a done to death topic on here but i've tried most of the solutions I can see from searching I need a count of how many classes a piece of equipment is fitted to, at the moment i can get the number of different types of equipment fitted...

Thank you for your reply, crosstab query seems to be what I was looking for googling is only as effective as the terms you use in the search it seems I shall get on with looking into these. In short what I need to do is press a button on a form and have it either export the spreadsheed or...

I have a query that pulls data from my database in the following format: EquipmentName Catagory Platform PlatformClass what I need to do with this is product a spreadsheet that has the EquipmentName along the Y axis, the Platform listed along the X axis and the cell to do a presence check to...

never mind I've stopped being special now corrected code below strSQL = "SELECT tblMEList.[Equipment Tag], tblCat.[GCFS Cat], tblPlatformList.Vessel, tblClass.Class, tblShipFitData.[Quantity fitted]" & _ "FROM ((tblCat INNER JOIN tblMEList ON tblCat.[GCFS Cat] = tblMEList.[GCSF...

Having fixed my previous issues I'm now trying something else, I want to use 2 list boxes on a form to input to a query but can't for the life of me get the SQL statement to work properly Both my functions to build the lists of selected items from each list box work fine and report correctly...

Having re written the SQL as follows it now runs but returns no results even though the listbox is populated from tblClass anyone? strSQL = "SELECT [tblMEList].[Equipment Tag], [tblPlatformList].Vessel, tblClass.Class, [tblShipFitData].[Quantity fitted]" & _ "FROM ([tblMEList]...