Búsquedas recientes


No hay búsquedas recientes

Third Party Integration Account's Avatar

Third Party Integration Account

Incorporación 16 abr 2021

·

Última actividad 14 mar 2023

Seguimientos

0

Seguidores

0

Actividad total

8

Voto

1

Suscripciones

6

RESUMEN DE LA ACTIVIDAD

Última actividad de Third Party Integration Account

Third Party Integration Account hizo un comentario,

Comentario de la comunidad Discussion - Tips and best practices from the community

@Joshua Bentley: it is possible to have the desired result you requested - a VB Script can do the magic for you.

Sub start_fillit()
On Error GoTo Ende:
Dim i As Long, tmp
Dim j As Long


For j = 1 To 7

For i = 1 To IIf(IsEmpty(Cells(Rows.Count, 7)), _
Cells(Rows.Count, 7).End(xlUp).Row, Rows.Count)
If Not IsEmpty(Cells(i, j)) Then
tmp = Cells(i, j).Value
Else
Cells(i, j).Value = tmp
End If
Next i

Next j

Columns("D:D").Select
Selection.Replace What:="true", Replacement:="WAHR", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Range("A1").Select

Ende:
End Sub

Ver comentario · Publicado 02 jun 2017 · Third Party Integration Account

0

Seguidores

1

Voto

0

Comentarios