excel vba - In range find this and do that -


There is a limit of cells with columns heading, in the range of cells, I want to find a number , Say

1 if it finds 1, then look for a variable, 2 or 4 in a row in the row, now that I can "triangle" (cell copy and paste) 1 "Then leave the number of variables in the week and add another triangle and continue doing it till the end of the range, then to the next line Put it down and do it by the end of the border, do the same way. Then, change to the next page and do the same thing ... through the entire workbook.

I think I have done this, know It is not the best way to do that.

I get an error 91 at the end of the second loop, second time the second loop ends, it goes through the error code. The error is over.

I do not know Is run through a bar, but not twice. sub add_translation2 () Dim Rng as the range dim range ("G25") 'Range worksheets (1) in the second Used to prevent the loop. Activate worksheets (1) range ("A1"). Select 'Paste the item (a triangle) to select. Copy for each of the worksheets worksheets (ws.Name). Active with range ("C4: G25") set RNG =. 1, Look In: ​​= XLVL) If not, then RGG is not something first then address = RNG. Contact RNG Activate Active Activate Paste OffRemember = Range ("A" and Activisel.ro) OffsetRange Set = Range Offset (0, -Enfnumber) if not ActiveCell.Address & lt; OffsetRange.Address and then exit if ActiveCell.Offset (, OffNumber). Select ActiveSheet.Paste Loop (ActiveCell.Address & lt; = OffsetRange.Address) Set the error on the Goto error line RNG = .Fund-next (RNG) loop while Rng is not nothing and RNG. Address & lt; & Gt; FirstAddress End if the error ends with: Error on the GoTo 0 application. EnabledEvents = True Next ws Application.CutCopyMode = False End Sub

I created from your description Using the Data Set was not able to receive error 91, perhaps a screenshot of the layout could help to recreate the problem.

However, I will do something like this, it will see the value of each cell in the range C4: G25, and if it is equal to 1, then it will paste the stored symbol in cell A1. sub-add_Triangles2 () Dim Rng range as RangeSpeed ​​RangeSymbol RangeSimbol = Range ("A1") set as the intensity dim form worksheet set as intFindNum To paste the symbol of the variable, intFindNum = 1 'is used to keep numbers to find worksheets (1). Activate for each task that works in worksheets (ws.Name). Activate in range for each RNG ("C4: G25") if Rng.Value = intFindNum then rngSymbol.Copy RNG end if next RNG next cm end sub

Comments

Post a Comment

Popular posts from this blog

Java - Error: no suitable method found for add(int, java.lang.String) -

I'm in the middle of homework work and I'm stuck. At this point in my code, I think that I should have a GUI window that opens and allows me to type "inserted text number". Notice is not going anywhere but at this point, If I pass through the problem then it will be in a linked list. I am getting two of the same error for the lines. Add (index, element); And I can not seem to get past it, there is no suitable method for the error "add (int, java. string string)". Code is below, please advise. To clarify - this will not be a method error because it is a linked list. There should not be any way involved. import java.awt. *; Import java.awt.event. *; Import javax.swing. *; Import java.util. *; Import java.util.Scanner; Import java.util.LinkedList; Public class TopTenList JFrame {Private TopTenList tt; See the Private JTextArea list; Private JTextField cmdTextField; Private JTextField resultsTestfield; // This GUI window is the code for the public toptist...
Read more

java - JPA TypedQuery: Parameter value element did not match expected type -

I am using JPA 2.0 and getting the following code in the DAO layer: Public Zero Test () {string key = "status"; String [] Conditions = {"A", "B"}; & Lt; TestTable & gt; Results = Search (Keys, Conditions); } Public listing & lt; TestTable & gt; Search (string key, object value error) {string sql = "test ndf to testlet and jade nand." + Key + "in:" + key; TypedQuery & LT; TestTable & gt; Query = entityManager.createQuery (SQL, TestTable.class); Query.setParameter (key, Arrays.asList (valueArr)) / *** Error Line *** Return query.getResultList (); } In the above error line, it throws the following exception: java.lang.IllegalArgumentException: parameter value element [[Ljava.lang.String; @ cbe5bc] did not match the expected type [java.lang.String] Why is this expected type string while actually this string []? Please help! Note: This is derived from the normal routine and is a simplified code. I can no...
Read more

c++ - static template member variable has internal linkage but is not defined -

Yes, I know, there is a question with almost the same title, but it refers to a different situation. Error message) In my case, I have a .cpp file with a big named designation name (implementation details). There is a property class template with a static data member in that name space, which I need to access from outside the unknown namespace. I give it a little bit of meat: file.hpp namespace Bar {template & lt; Typename A & gt; Struct foo {static_assert (is_same & lt; a, float & gt; :: value} is_same & lt; a, double>: value, ""); Fixed zero set_static_var (a const & x); // ...}; } and file.cpp namespace {template & lt; Typename A & gt; Struct foo_traits {// supports the implementation of several static code bars: foo & lt; & Gt; Fixed A data; }; The template's & lt; & Gt; Float foo_traits & lt; Float & gt; :: datum; // No change if this is in the global namespace template & lt; & Gt; Doub...
Read more