Saltar al contenido

Terrible, pesimo, muy mal


Ajedrez

Recommended Posts

publicado

He hecho lo posible por mantener todos los mensajes, y ésta es sólo la primera fase.

Hola @sergio, espero que en próximas fases logres recuperar todos los mensajes del foro, pues redundará en beneficio de los potenciales visitantes del foro, que muchas veces buscan y encuentran ayuda gracias a nuestro querido "San Google" en el archivo del foro y de paso conocen este maravilloso foro.

Lo que no me ha gustado nada es el tema de la privacidad que se ha perdido con este nuevo formato del foro.

En concreto la fecha de nacimiento es uno de los datos confidenciales que estaba a buen recaudo en el anterior foro pero que se muestra con todo detalle ahora.  

Como cualquier dato protegido en España por la LOPD, como el DNI, la fecha de nacimiento es un dato sensible para el que se debe solicitar autorización, u ocultarlo por defecto, antes de sufrir demandas costosas.

En la versión anterior se podían marcar casillas para aceptar o declinar la publicación de la fecha de nacimiento.

En mi caso tenía desmarcada la configuración de privacidad, por lo que no aparecía a otros usuarios mi fecha de nacimiento.

Ahora no tengo opción para preservar mi privacidad, lo que me ha obligado a borrar mi fecha de nacimiento del nuevo foro.

@sergio, ¿puedes hacer algo similar para editar la configuración de privacidad en este formato de foro?

Si no es posible, deberás solicitar autorización individual a cada uno de los miembros del foro o borrar inmediatamente todas las fechas de nacimiento, antes de que algún forero astuto te denuncie.

Con los mensajes pasados se puede jugar, con la privacidad no se juega.

11ccbap.jpg

 

Con los mensajes pasados se puede jugar, con la privacidad no se juega.

publicado
Hace 20 minutos , pegones1 dijo:

En concreto la fecha de nacimiento es uno de los datos confidenciales que estaba a buen recaudo en el anterior foro pero que se muestra con todo detalle ahora.  

@pegones1, tienes toda la razón del mundo. te pido disculpas.

He modificado la plantilla para que no se muestren ni la fecha de nacimiento ni el correo electrónico.

A mí también me importa la privacidad del foro...

 

publicado
Hace 11 minutos , sergio dijo:

@pegones1, tienes toda la razón del mundo. te pido disculpas.

He modificado la plantilla para que no se muestren ni la fecha de nacimiento ni el correo electrónico.

A mí también me importa la privacidad del foro...

 

Excelente, has sido tú más rápido en modificarlo que yo en escribirte el mensaje anterior.

Los que publicamos blogs y material confidencial empresarial, debemos estar muy atentos para proteger nuestros datos confidenciales de fisgones con mala baba y de potenciales denuncias muy caras de pagar.

Internet nos permite compartir todo pero debemos ser igual de prudentes que cuando no les damos nuestros datos a los extraños que nos cruzamos por la calle.

publicado
Hace 15 horas, Ajedrez dijo:

Yo no intereso y sinceramente me da igual si puedo acceder o no a la información del foro, si se puede aquí estaré, y si no, pues la verdad ni modo, ojala se pueda, pero si no, pues que se le va a hacer, ni modo .....

No me lo tomes a mal, solo digo la verdad, sé que has ayudado a muchos usuarios y eso es excelente y bueno ..... pero personalmente yo no te he aprendido nada, nunca volteo a ver el detalle de lo que expones y nunca te he preguntado nada, de hecho creo que casi no pregunto aquí en el foro, si puedes bloquear tus mensajes para mi entonces bloquéalos,  insisto, lo importante es la comunidad Exceliana por encima de cualquier persona.

Exacto Ajedrez, asi es, lo fundamental es la comunidad y uno de los elementos que mantienen vivo el foro, son precisamente COLABORADORES como Macro Antonio (entre muchos otros); si no haz aprendido de los aportes de Macro y de los demás, pues creo te lo pierdes:rolleyes:

Por favor mantén la calma para que el foro siga con habitual armonía 

 

Saludos 

publicado
Hace 15 minutos , Macro Antonio dijo:

Pedro. ¿Tan viejo eres que no quieres que sepamos tu edad ? Pillín, pillín,.....:P

 

@Macro Antonio, me siento tan joven como tú, porque conozco pocos de nuestra edad que aún siguen inmersos en las nuevas tecnologías.

Lo que me preocupa y nos debe preocupar a todos los miembros del foro es la facilidad con la que pueden usurpar nuestra identidad con solo saber nuestro nombre, dirección y fecha de nacimiento.

http://www.avpd.euskadi.eus/s04-0003/es/contenidos/informacion/robo_identidad/es_identida/index.html

El robo de identidad consiste en la utilización ilegal de datos personales para realizar un fraude o delito.

Si te roban la identidad, podrías figurar como responsable de actuaciones que no has realizado, podrían hacerte responsable de declaraciones que no has hecho, podrías recibir facturas pendientes de pago, y aparecer en un fichero de morosos, lo que impediría que te concediesen préstamos, tarjetas de crédito o un crédito hipotecario, y además podría transcurrir mucho tiempo hasta que se solucionase la situación.

publicado

Gerson, céntrate en lo que dio origen a este tema y dejemos de estar echando alabanzas a todo mundo.

Si por remodelar el foro se pierde/borra/desaparece información a mi me parece una "barbaridad" inaceptable ..... porque precisamente quien pierde es toda la comunidad, checa lo que dice Pegones1 más arriba, concretamente aquí:

Cita

Hola @sergio, espero que en próximas fases logres recuperar todos los mensajes del foro, pues redundará en beneficio de los potenciales visitantes del foro, que muchas veces buscan y encuentran ayuda gracias a nuestro querido "San Google" en el archivo del foro y de paso conocen este maravilloso foro.

Entiendo que muchos no estén de acuerdo con mi posición pero la misma ahi está.

Y por lo que se ve hay bastantes que aprobarían el borrado de datos del foro; total, es su culpa si no lo salvaron en el disco duro ..... ¡que barbaridad! ..... en fin.

publicado
Hace 24 minutos , Ajedrez dijo:
Hace 24 minutos , Ajedrez dijo:

Gerson, céntrate en lo que dio origen a este tema y dejemos de estar echando alabanzas a todo mundo.

 

Honor a quien merece!, ademas tengo el derecho de elogiar a quien yo desee

 

Hace 25 minutos , Ajedrez dijo:

Si por remodelar el foro se pierde/borra/desaparece información a mi me parece una "barbaridad" inaceptable ..... porque precisamente quien pierde es toda la comunidad, checa lo que dice Pegones1 más arriba.

Entiendo que muchos no estén de acuerdo con mi posición pero la misma ahi está.

Y por lo que se ve hay bastantes que aprobarían el borrado de datos del foro; total, es su culpa si no lo salvaron en el disco duro ..... ¡que barbaridad! ..... en fin.

Tal como te lo menciono Sergio (en este mismo tema), parte de lo que indican nuestras normas

Por favor, si no estás de acuerdo con algunos de nuestros Términos de Servicio, Política de Privacidad y Normas no utilices nuestros servicios.

Y pues ya que todo esta aclarado, cerramos este tema

 

Saludos 

publicado

Hola, cuando invocamos a una comunidad diciendo que es más importante que los individuos que la integran..., no tiene buena pinta.

> lo importante es la comunidad Exceliana por encima de cualquier persona. <

Saludos,

bfelix

 

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

  • 109 ¿Te parecen útiles los tips de las funciones? (ver tema completo)

    1. 1. ¿Te parecen útiles los tips de las funciones?


      • No
      • Ni me he fijado en ellos

  • Ayúdanos a mejorar la comunidad

    • Donaciones recibidas este mes: 0.00 EUR
      Objetivo: 130.00 EUR
  • Archivos

  • Estadísticas de descargas

    • Archivos
      188
    • Comentarios
      98
    • Revisiones
      29

    Más información sobre "Cambios en el Control Horario"
    Última descarga
    Por pegones1

    4    1

  • Crear macros Excel

  • Mensajes

    • Hola, veo que tienes 365, así que esta forma funcionará   Almacen.xlsx
    • Buenos días  @LeandroA espero estes bien Tengo un caso idéntico al planteado en la siguiente pregunta: Sin embargo, a diferencia de quien planteo originalmente la pregunta al correr el código no obtengo ningún resultado podrían ayudarme a resolver este inconveniente y que al hacer click en el Botón Guardar (CommandButton3) del Formulario RCS (frmrcs) el archivo pdf quede configurado con orientación vertical, márgenes superior, inferior, derecho e izquierdo = 1 y en página tamaño carta. Si acaso influye uso Microsoft Excel LTSC MSO (versión 2209 Compilación16.0.1.15629.20200) de 64 bits Mucho le sabre agradecer la ayuda que me pueda dar  RCS PRUEBA - copia.xlsm
    • @JSDJSDCon gusto mi estimado Para la opción 1: Sub Surtirhastadondealcanse() Dim ws As Worksheet Set ws = ThisWorkbook.Sheets(1) Dim filaInicio As Integer: filaInicio = 4 Dim filaFin As Integer: filaFin = 7 Dim colInventario As Integer: colInventario = 2 Dim colSolicitudesInicio As Integer: colSolicitudesInicio = 4 ' Columna C Dim colResultadoInicio As Integer: colResultadoInicio = 9 ' Columna I Dim colTotalSurtido As Integer: colTotalSurtido = 12 ' Columna L Dim colFinalInventario As Integer: colFinalInventario = 13 ' Columna M Dim numClientes As Integer: numClientes = 3 Dim fila As Integer, i As Integer For fila = filaInicio To filaFin Dim inventario As Double inventario = Val(ws.Cells(fila, colInventario).Value) Dim solicitudes(1 To 3) As Double Dim surtido(1 To 3) As Variant Dim totalSurtido As Double: totalSurtido = 0 ' Leer solicitudes For i = 1 To numClientes If IsNumeric(ws.Cells(fila, colSolicitudesInicio + i - 1).Value) Then solicitudes(i) = CDbl(ws.Cells(fila, colSolicitudesInicio + i - 1).Value) Else solicitudes(i) = 0 End If surtido(i) = "POR FALTA STOCK" Next i ' Surtir de acuerdo al inventario disponible For i = 1 To numClientes If solicitudes(i) > 0 Then If inventario >= solicitudes(i) Then surtido(i) = solicitudes(i) inventario = inventario - solicitudes(i) totalSurtido = totalSurtido + solicitudes(i) ElseIf inventario > 0 Then surtido(i) = inventario totalSurtido = totalSurtido + inventario inventario = 0 Else surtido(i) = "POR FALTA STOCK" End If End If Next i ' Escribir resultados en las columnas correspondientes para cada cliente For i = 1 To numClientes With ws.Cells(fila, colResultadoInicio + i - 1) If surtido(i) = "POR FALTA STOCK" Then .Value = surtido(i) .Font.Color = vbRed Else .Value = surtido(i) .Font.Color = vbBlack End If End With Next i ' Escribir total surtido y existencia final ws.Cells(fila, colTotalSurtido).Value = totalSurtido ws.Cells(fila, colFinalInventario).Value = inventario Next fila MsgBox "Resultado surtido cargado con éxito...", vbInformation End Sub Para la opción 2:   Sub surtirenpartesiguales() Dim ws As Worksheet Set ws = ThisWorkbook.Sheets(1) Dim filaInicio As Integer: filaInicio = 13 Dim filaFin As Integer: filaFin = 16 Dim colInventario As Integer: colInventario = 2 Dim colSolicitudesInicio As Integer: colSolicitudesInicio = 4 ' Columna C Dim colResultadoInicio As Integer: colResultadoInicio = 9 ' Columna I Dim colTotalSurtido As Integer: colTotalSurtido = 12 ' Columna L Dim colFinalInventario As Integer: colFinalInventario = 13 ' Columna M Dim numClientes As Integer: numClientes = 3 Dim fila As Integer, i As Integer For fila = filaInicio To filaFin Dim inventario As Double inventario = Val(ws.Cells(fila, colInventario).Value) Dim solicitudes(1 To 3) As Double Dim surtido(1 To 3) As Variant Dim totalSurtido As Double: totalSurtido = 0 Dim totalPedido As Double: totalPedido = 0 ' Leer solicitudes For i = 1 To numClientes If IsNumeric(ws.Cells(fila, colSolicitudesInicio + i - 1).Value) Then solicitudes(i) = CDbl(ws.Cells(fila, colSolicitudesInicio + i - 1).Value) totalPedido = totalPedido + solicitudes(i) Else solicitudes(i) = 0 End If surtido(i) = 0 Next i ' Si hay suficiente inventario, surtir lo que el cliente pide If inventario >= totalPedido Then For i = 1 To numClientes If solicitudes(i) > 0 And inventario >= solicitudes(i) Then surtido(i) = solicitudes(i) inventario = inventario - solicitudes(i) totalSurtido = totalSurtido + solicitudes(i) End If Next i Else ' Reparto base igualitario Dim baseSurtido As Long baseSurtido = Int(inventario / numClientes) For i = 1 To numClientes If solicitudes(i) > 0 Then If solicitudes(i) <= baseSurtido Then surtido(i) = solicitudes(i) inventario = inventario - solicitudes(i) totalSurtido = totalSurtido + solicitudes(i) Else surtido(i) = baseSurtido inventario = inventario - baseSurtido totalSurtido = totalSurtido + baseSurtido End If End If Next i ' Repartir sobrante restante uno por uno, respetando lo pedido Do While inventario > 0 For i = 1 To numClientes If surtido(i) < solicitudes(i) Then surtido(i) = surtido(i) + 1 totalSurtido = totalSurtido + 1 inventario = inventario - 1 If inventario = 0 Then Exit For End If Next i Loop End If ' Escribir resultados en las columnas correspondientes para cada cliente For i = 1 To numClientes With ws.Cells(fila, colResultadoInicio + i - 1) If surtido(i) = 0 Then .Value = "POR FALTA STOCK" .Font.Color = vbRed Else .Value = surtido(i) .Font.Color = vbBlack End If End With Next i ' Escribir total surtido y existencia final ws.Cells(fila, colTotalSurtido).Value = totalSurtido ws.Cells(fila, colFinalInventario).Value = inventario Next fila MsgBox "Resultado surtido cargado con éxito...", vbInformation End Sub Saludos, Diego
    • Buenos dias.  Estoy trabajando en una hoja para poder llevar un control de un pequeño almacén.  Tengo un pedido con varias líneas y "lotes" y necesito sacar las ubicaciones que coincidan con la referencia y lote que pone en el pedido. El problema viene cuando tengo la misma referencia y mismo lote en ubicaciones diferentes y necesito sacar la información en columnas diferentes. No se si  me he explicado bien, pero creo que con el ejemplo adjunto se entiende mejor. Agradecería mucho si me pudieran ayudar  Libro1.xlsx
    • Exelente solución mil gracias 
  • Visualizado recientemente

    • No hay usuarios registrado para ver esta página.
×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.