14 replies to this topic

[sinkfaze]

Does each cell have to have its own unique variable for its data or can you re-use the same one for each copy from Excel/paste to another program?

[sinkfaze]

If you want to copy one number from Excel and move it over to the Citrix window you can run this (which I've modified a little to condense down your code):

Send ^c
ClipWait
Send {ENTER 2} ; sends ENTER twice, which goes to the next cell below
WinWait, Citrix1
WinActivate, Citrix1
Send F[color=red]^v[/color]{NumpadEnter}M{Tab [color=red]2[/color]}PGS Baeake{space [color=red]20[/color]}{NumpadEnter}F
return

If you need to copy a whole series of things before you go to the other program and paste them I'm sure we can look into a loop that can copy all of them, something like this:

Loop, 20 ; loops 20 times if you need to copy 20 spreadsheet cells, for example
{
  Send ^c
  ClipWait
  Send {ENTER 2}
  ClipText .= Clipboard "`n" ; appends the current contents of the Clipboard followed by a linefeed(`n, which moves to a new line) to a variable
  Clipboard = ; empties the Clipboard before the next loop
}
Clipboard := ClipText ; saves the contents of the variable ClipText to the Clipboard

[outstretchedarm]

I'm also really interested in this.

I have a spreadsheet that is a 7 x 128 table.

I'd like to have autohotkey copy the certain cells and paste them into another program I use, called midi-ox,

I've been doing it manually for about 5 hours now and am only about 15% through.

I'm new, but I'm not looking for the code to be given to me, just how I might structure this

thanks

[outstretchedarm]

I've been perusing the sight and have learned that when people are serious about being helped, they break down what the macro they are desiring does, step by step. Also, I'll attached some screenies to help visualize:

A) Check excel spreadsheet, "Chords by more" and look up cell B1. This value we'll call the "trigger".

http://www.theflipsi...ach=12651;image

Copy this value to the clipboard

C) Open up the application Midi-Ox

D) Click the Insert button in Midi-Ox (see green arrow in screenie2)

http://www.theflipsi...ach=12652;image

E) In new dialogue box, paste the copied value into the 3rd and 4th fields (labeled min and max values)

F) go back to the excel spreadsheet

G) go down one cell

H) Copy that value (I call this second value down the contrabass value)

I) Go back to midi-ox

J) In the dialogue box, click on the "Pass original value (clone) check box so it is checked

K) Also in the dialogue box, paste this second copied value, into the 10th and 11th fields

L) Ok the dialogue box

M) Repeat: go back, copy the trigger value again and paste each of the values for bass, baritone, tenor, etc...till there are no more values in the column

N) Now move over to the next column on the right, and repeat the whole thing again for this new trigger number

O) Stop when there are no more columns with data in excel



thanks in advance for any help. I hope my screenies come through but if not I hope I have supplied enough info

[tank]

screen shots didnt work

[outstretchedarm]

can anybody help without the screenies? i thought I was pretty thorough

thanks

[outstretchedarm]

anyone?

[tank]

I dont have the other application and am not interested in getting it
there are half a dozen COM based methods for workign with excel posted in the forum i wont repost those here

[wooly_sammoth]

outstretchedarm:

I would script this so that all the values in the excel spreadsheet were copied in one go and saved to variables, then move to the midi-ox program and paste what you need. That way you can set up a loop to move one column over each time.

something like:

clipboard = ; empties the clipboard
WinActivate, (name of excel window)
Send, ^{Home}{Left}^c ; Copies cell B1
ClipWait, 1
StringTrimRight, trigger, clipboard, 2 ; copies the clipboard to the 'trigger' variable (minus the line break at the end)
Loop
{
    clipboard =
    Send, {Down}^c ; Copies Cell B2
    ClipWait, 1
    CellCheck := Clipboard ; This bit checks if the cell is empty 
    StringSplit, CellCheck_, CellCheck, `n, %A_Space% %A_Tab% `n 
    Length := StrLen(CellCheck_1) 
    IfLessOrEqual, Length, 1 ; and if it is stops copying
        Break
    Else, 
        StringTrimRight, value_%A_Index%, clipboard, 2 ; If the cell has a content it is copied to a variable (%A_Index% is the number of times the loop has run so each copied cell down will be one number higher)
}

You now have all the data from the first column of your spreadsheet saved as variables so you just need to activate the midi-ox window and use 'Click' and 'Send' to fill in the various input boxes.

When you've done that just activate the Excel window again, and copy the next line over.

[outstretchedarm]

hey thanks alot, now I just need to digest this

[CloudSurfer777]

Nice code wooly_sammoth!

[Gs00000000]

Hi,
Just wondering if you could show an example of pasting the clipboard variables into notepad

Paste variable 1
Send {return}
Paste variable 2
Etc?