Moderatori: Anthony47, Flash30005
In modo tale che vengano copiati insieme, uno dietro l'altro in ordine, in blocco da tre celle.
... devo creare un database con 100 mila righe per la mia tesi magistrale ...
Option Explicit
Sub Elabora()
Dim UR As Long, I As Long, X As Long
Application.ScreenUpdating = False
X = 19
UR = Range("O2").End(xlDown).Row
For I = 3 To UR
Range(Cells(2, X).Address, Cells(2, X + 3).Address).Value = Range("O" & I & ":R" & I).Value
X = X + 4
Next I
Range("O3:R" & UR).ClearContents
Application.ScreenUpdating = True
MsgBox "La opia dei dati è stata effettuata"
End Sub
Sub MoveBlk()
Dim TRow As Long, TCol As Long, I As Long
'
With Selection
If .Count < 8 Then
MsgBox ("La selezione sembra troppo limitata, operazione abortita")
Exit Sub
End If
TRow = .Range("A1").Row - 1
For I = 1 To .Rows.Count
TCol = Cells(TRow, Columns.Count).End(xlToLeft).Column + 1
.Offset(I - 1, 0).Resize(1).Cut Cells(TRow, TCol)
Next I
End With
End Sub
DESCRIPTIONS
Session start time : 9-Jan-2014 14.14.45
User name : Motion
Computer name : MOTION-PC
Software key ID : 798436601
Subject ID : STUD04
Date of birth : 11-Dec-1990
Gender : Male
Subject notes :
Age : 23
NART :
Session notes :
Session # : 1
Battery : Battteria Studenti B
Test : (IST) Information Sampling Task
Mode : decreasing win-fixed win
Testing language : italiano
Test start time : 9-Jan-2014 14.34.44
Test duration : 792348
Test outcome : test completed
Press pad type : Camcog Serial Press Pad
Test notes :
Torna a Applicazioni Office Windows
Excel: formula automatica per evidenziare prodotto scaduto Autore: gamma_ray |
Forum: Applicazioni Office Windows Risposte: 3 |
Salvare file excel in formato html escludendo le immagini Autore: systemcrack |
Forum: Applicazioni Office Windows Risposte: 5 |
formula excel non visualizza risultato Autore: tommasog |
Forum: Applicazioni Office Windows Risposte: 6 |
Inserimento valore di una cella in testo di altra cella Autore: Ricky0185 |
Forum: Applicazioni Office Windows Risposte: 7 |
Excel 2016 - Funzione SCARTO + INDIRETTO Autore: pl1957 |
Forum: Applicazioni Office Windows Risposte: 2 |
Visitano il forum: Nessuno e 35 ospiti