Move Data from One Row to Another in Separate Columns
Hi, I have file where the original format has two questions per person and puts the questions & answers in two separate rows. (See rows 2 & 3 below) I need to have the questions and the answers from row 3 moved to row 2 in separate columns. Thanks in advance for any helpAccess Europe meeting on Wed 6 Sept - Database Analyzer and other tools
The next Access Europe meeting will be on Wednesday 6 Sept 2023 starting at 18:00 UK time (6PM UTC+1) and finishing at about 19:15 (7.15PM) The start time is equivalent to 19:00 (7PM) in Central Europe and 10AM in Seattle / PST Please note that the UK is now on Summer Time (UTC+1). For local times, please check https://www.worldtimebuddy.com/ In this month's session, I will be demonstrating my new Database Analyzer Pro application. The free evaluation version is now available for download from the above link on my website If time permits, I will also be discussing a number of related Access examples and code samples such as: • the use of progress bars • creating a table of contents in Access reports • the undocumented SaveAsText/LoadFromText features • changing query views using command bars code For more details about this session, see: https://accessusergroups.org/europe/event/access-europe-2023-09-06/ or https://isladogs.co.uk/aeu-19/ The meeting will again be held on Zoom. When the time comes, you can connect using: Join Zoom Meeting. If you are asked, use: Meeting ID: 924 3129 5683 ; Passcode: 661210 For more connection options, please see the AccessUserGroups.org web page for this event All sessions are recorded and later uploaded to the Access User Groups channel on YouTube I hope you will join us for this month's session. As always, the session will be recorded and the video uploaded to YouTube after the event NOTE: I regret that the planned presentation on Better Access Charts by Thomas Moller originally scheduled for Wed 6 Sept has been postponed until further notice.
Problem Creating a usable zip file using VBA. Does anyone have an alternative?
I am hitting a problem creating a usable zip file using VBA. I am using the following code block to create a zip file. I found it in virtually all internet posts that I came across and for that, I copied it with high confidence that it will work. But it's not working as expected when the storage device is a MicroSD or Flash Drive. the sub-routine works fine if the storage device is an internal hard drive, portable hard drive (HDD) or portable solid-state drive (SSD) sub Create_Zip_File (argDestZipPath as Variant) Open argDestZipPath For Output As #1 'Create an empty zip file Print #1, Chr$(80) & Chr$(75) & Chr$(5) & Chr$(6) & String(18, 0) Close #1 end sub The sub-routine does create an empty zip file on a Flash Drive or MicroSD storage device on the specified path, but I can't open it either manually or with vba code. I get the following prompt as I manually click on the zip file icon in the window or as I attempt to utilize the shell.CopyHere method using the statements below. Set ShellApp = CreateObject("Shell.Application") ShellApp.Namespace(argDestZipPath).CopyHere ShellApp.Namespace(argItemToZipPath) In comparison, I can manually create an empty zip file in the same location on the Flash or MicroSD and can successfully open the resulting file by manually clicking the icon or by way of vba code without incurring the prompt. I can also create the empty zipped file on the hard drive, then move it to the flash drive or MicroSD where it works normally without incurring the prompt. The problem occurs only when the subroutine creates the zip file directly to the FlashDrive or MicroSD. Background I am using Windows 10 (Home), with the most recent updates, and am using MS Access in an Office 365 subscription that I believe is also up to date. I have a 64bit machine. The MicroSD card and flash drive are formatted as NTFS. I suspect there is an alternative to the Print statement that creates the zip file that will configure the zipped file exactly as does the manual procedure available on the windows explorer shortcut menu Does anyone know an alternative to the following? Print #1, Chr$(80) & Chr$(75) & Chr$(5) & Chr$(6) & String(18, 0) My current vba workaround is to automatically create the empty zip file on the hard drive, then move copy (via FileSystemObject class) a pre-existing empty zipfile.zip on the hard drive to the MicroSD or Flash drive, then renaming it according to characteristics of the intended content before proceeding to send files to it. This is effective as a stop-gap but certainly not preferred.
