<div>
Hi,<br />
<br />
Could you be more specific?<br />
<br />

<pre><code id="code-20-39950364-1">Sub macro()
For Each c In Range(&quot;A1:A10&quot;)
    If LCase(c) = &quot;x&quot; Then
        c.Offset(0, 1).Copy Destination:=Worksheets(&quot;Sheet3&quot;).Range(&quot;B&quot; &amp; Cells.Rows.Count).End(xlUp).Offset(1)
        c.EntireRow.Delete
    End If
Next
End Sub</code></pre>
Regards
</div>


Hi,

Could you be more specific?



Sub macro()
For Each c In Range("A1:A10")
    If LCase(c) = "x" Then
        c.Offset(0, 1).Copy Destination:=Worksheets("Sheet3").Range("B" & Cells.Rows.Count).End(xlUp).Offset(1)
        c.EntireRow.Delete
    End If
Next
End Sub

Regards

<div>
Used the advanced filter<br />
<br />
Thx to Rob
</div>


<div>
<div class="content wysiwyg-content">
Can somebody help me with some VBA-code that loops through a range and copies the value in a cell to another sheet when condition is met.<br />
<br />
Example:<br />
<br />
Check if the value of cells A1:A10 = x, if yes copy the corresponding values from B1:B10 to another sheet<br />
<br />
Best wishes <br />
Lars
</div>
</div>


Can somebody help me with some VBA-code that loops through a range and copies the value in a cell to another sheet when condition is met.

Example:

Check if the value of cells A1:A10 = x, if yes copy the corresponding values from B1:B10 to another sheet

Best wishes 
Lars

Copy value to another sheet when condition is met

A spreadsheet is an interactive computer application program for organization, analysis and storage of data in tabular form. Spreadsheets developed as computerized simulations of paper accounting worksheets. The program operates on data represented as cells of an array, organized in rows and columns. Each cell of the array may contain either numeric or text data, or the results of formulas that automatically calculate and display a value based on the contents of other cells.

Spreadsheets

Microsoft Excel topics include formulas, formatting, VBA macros and user-defined functions, and everything else related to the spreadsheet user interface, including error messages.

Microsoft Excel

VBScript (Visual Basic Scripting Edition) is an interpreted scripting language developed by Microsoft that is modeled on Visual Basic, but with some important differences. VBScript is commonly used for automating administrative and other tasks in Windows operating systems (by means of the Windows Script Host) and for server-side scripting in ASP web applications. It is also used for client-side scripting in Internet Explorer, specifically in intranet web applications.