New answers tagged

0

Since AutoHotkey listens to actual keyboard events and is not aware of what goes on internally on any specific application, and since Vim's mappings are not actually sending new keyboard events when they trigger, no. You can create an AutoHotkey macro that is specific to Vim only: SetTitleMatchMode, RegEx #IfWinActive, - G?VIM\d+ :*?:`,w:: do ...


0

Excel will show the same view you had when saving (unless a macro runs and changes it). So you just hit CTRL+END and then Save, and it will stay there.


0

Export: Macros are stored as simple text files at %LOCALAPPDATA%\Nox\record. To locate the macro you want to export, open records in your favorite text editor, locate the section that contains the name of the macro you want to export. If you want to export the macro named MACRONAME, search for the corresponding entry in the records file: ... "...


0

...but I want 30 times "as" Two ways I think that may help. send {a}{s} ; ; or mystr:="as" ; set a string value send %mystr%; send string Loops: mystr:="as" ; set a string value Loop, 30 { send %mystr%; send string }


0

The simplest answer is that you can't run Quick Steps from VBA macros, sorry.


0

According to Microsoft help, you can use ASCII (or similar) codes that denote the lower and upper case letters separately. This only works for each letter separately, though. You can find ASCII (and other) codepages (lists of the alphabet letters and their corresponding codes) online. Here's link to an excellent resource, which - if studied carefully - ...


0

This is possible by writing a vbscript that invokes other context menu actions or verbs registered for the file type you're right-clicking on. The methods that can be used are InvokeVerb or DoIt If you can post the exact menu options (caption) with the accelerator keys, a script can be written for that, which can be incorporated to the right-click menu.


0

Although its not exactly what you asked for, I think I have an alternate solution for you. VirusTotal is a subsidiary of Google and has an app that integrates into the Windows Explorer context menu. This will send a file (up to 5 at once) to be scanned by 54 different virus scanners and give you the results. I find this program to be extremely useful ...


2

It's possible you accidentally turned on the "Show Formulas" option. You can disable it by going to the Formulas tab→Formula Auditing→Show Formulas. Alternately, the hotkey is Ctrl+~ (that's the tilde key at the top left of your keyboard).


0

I used the following code to solve my problems: I created AvivoWB = ActiveWorkbook and used this in the code. Like my expectation i needed to change the directory = "c: est\" into directory = GetFolderName() & "/" Sub Import_Excel_sheets() Dim directory As String Dim fileName As String Dim sheet As Worksheet Set ActivoWB = ActiveWorkbook Application....


0

Thank you Teylyn, I finally figured out now. I needed to change selection.textocolumns into myRange.TexttoColumns. I didn't change the Comma, cause it was only for changing dataformatting from US to EU. My final code is this: Sub Macro3() Dim myRange As Range Set myRange = Selection myRange.TextToColumns Destination:=myRange, DataType:=...


2

You don't specify a delimiter, so even your first bit of code fails. I've set the comma option to true to get the code to run. You may want to use a different delimiter. You can assign any range to MyRange, as long as it is suitable for the text to columns operation, i.e. one column only and data that suits the pattern you have set up, i.e. only two ...


0

Try this Public Sub CreateCustomList() Dim v As Variant Dim rng As Excel.Range Set rng = ActiveSheet.Range("A1:A3") 'Transpose from 2 dim array to 1 dim array v = Application.Transpose(Selection) 'Add the custom list Application.AddCustomList v End Sub


0

You may try ActiveSheet.UsedRange.Rows.Count which returns the last row number of the current worksheet. While it does not check row A, it is a neat way to fill data down to the last row. For example lastRow = ActiveSheet.UsedRange.Rows.Count ' ... something else ... Selection.AutoFill Destination:=Range("H2:H" & lastRow) You can replace the ...


0

You could probably do something along the lines of: 1) Trap the SelectionChange event 2) When the event fires, check to see that the current slide is not the same as it was the last time you trapped a SelectionChange event (because the event fires when you select different shapes as well as different slides). 3) If it's a different slide, run your code ...


0

1. I noticed a mixture of &'s and +'s. 1a. I fixed them. 2. I think you need to cast your integers to strings (TopRow, NewLastRow, others). 2a. I cast them for you. I cut your code exactly. I added some comments that you will see in green once you cut this and paste it. I added casting to your integers in Range fields. If your code is ...



Top 50 recent answers are included